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TRAPEZOID 
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SCS 

METHOD 



NOTE; 


POINT METHOD 


CCS, BCS 
ORIGIN 
Z- 



EXAMPLE: 



PI = XI, 

Yl, 

Z1 

P2 = X2, 

Y2, 

Z2 

1’3 = X3, 

Y3, 

Z3 

f4 = X4, 

Y4, 

Z4 


POINTS ARE NUMBERED CCW 
around figure as VIEIiIED 
FROM THE ’’TOP" SIDE OF 
THE SURFACE. P1-P4 MUST 
BE SHORTER THAN AND 
PARALLEL TO P2-P3. 

FOR A TRIANGLE, PI 
AND P4 ARE ENTERED AS 
DUPLICATE POINTS 


**’Surfa.ce" coordinate system as 
generated by program. 


Figure 3-7. 
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SPHERE 


SOS 

METHOD 


POINT 

METHOD 



NOTES: o PI defines the “North Pole” of the iphere, 

o P2 and P3 define the equatorial pi ,ne of the sphere and the extremities 
of the active portion of the sphere in the angular direction about the 
polar axis. Surface is generated from P2 to P3 CCW as viewed from 
PI toward P4, 

o P4 defines the center of the sphere. 

o P5 and P6 must lie on the longitudinal line defined by PI and P3. P5 
and P6 define the extremities of the active portion of the sphere as 
measured along the polar axis. 

o All six points must be input for any partial definition of a spherical 
surface. 

o A complete sphere is generated from 3 points: PI - North Pole, P2 - 

Center, P3 - Point on Equator where node generation begins. 
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CIRCULAR PARABOLOID 
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SCS 

METHOD 



FOUR POINT INPUT 


POINT 

METHOD 


’^’’Surface" coordinate 
system as generated by 
program. 



NOTll: PI AND P4 DEFINE AXIS OF REVOLUl’lON. 
SURFACE IS GENERATED FROM P2 TO P3 
CCW AS VIEWED FROM PI TOWARD P4 


Figwpe 3-7. (cont) 
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METHOD 
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NOTE: El, P2 AND P3 MUST ALL LIE ON SAME FACE OF 

FIGURE, WITH P4 DIAGONALLY OPPOSITE PI. FACE 
CONTAINING PX, P2 and P3 DELETED FOR 5 -SIDED BOX. 

Figure''^-?. (oont) 
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INDICATED BY THE CIRCLED NUMBERS. 
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METHOD 2 
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Figure 3-7, (aonal) 
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The variables found in the surface data block can be grouped as follows: 

- general data 

- dimensional data 

- properties data 

- position data 

- ICS definition data 

A summary of the function of each data group follows: 

General data - this **catch all" data group is used to define: 

1) node identification numbers 

2) surface type (disk, sphere, etc.) 

3) active side information 

4) shadowing information, and 

5) nodal breakdown and dimension information. 

Dimensional data - This data group is used to define the desired boundaries of 

the geometric surfaces and portions of same. 

Properties data - This data group is used to define the optical properties of 

the surfaces. Properties allowed are diffuse solar abs^.rpti- 
vity and transmissivity, diffuse infrared emissivity and 
transmissivity, specular solar reflectivity, and specular 
infrared reflectivity. 

Position data - These data are the six rotation and translation variables nec- 
essary to locate an SGS relative to an ICS, BCS or CCS, 

3. 3. 3, 6 Nodal Surface Identification 


When a surface is subdivided into nodal surfaces, the user has the 
option of numbering the nodal surface consecutively, beginning with the identi- 
fication number he used for the surface, or arbitrarily, using a node number 
array. In either case, he must understand the scheme used by TRASYS to identify 
nodal surfaces. Figure 3-8 illustrates this process with examples of surfaces 
with single and dual active sides. 

The user will no doubt quickly discover from Figure 3-7 that the node 
numbering schemes are related to the SCS -referenced method but have no rela- 
tion to the CCS -referenced point method. The number scheme functions with 
point input, however, because the first step in processing a point-defined sur- 
face is to provide it with an internally generated SCS. Once this is done, the 
node numbering scheme can proceed. It is necessary, therefore, for the user 
to understand 'low the internally generated surface coordinate system relates 
I to his point input. This is illustrated for each surface type in Figure 3-7. 


YMIN, ZMIN, RMIN 



Figure 3—8 Node Generation Order 


SINGLE ACTIVE 
SIDE . (VIEW FROM 
OUTSIDE OR TOP) 


BOTH SIDES ACTIVE. 

EIRST, THIRD, FIFTH, 

ETC. NODES ARE ON INSIDE 
OR BOTTOM. SECOND, 
FOURTH, SIXTH, ETC. NODES 
ARE ON .OUTSIDE OR TOP. 
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An understanding of Figures 3-7 and 3^8 should enable the user to properly 
number his nodal surfaces when using point input to define the surface. 

The user should realize that the generalized node breakdown schemes in- 
volving NNX, NNYj UNNX, UNNY, etc,, do not pertain to the BOX and POLYGON sur- 
face types where a fixed node generation scheme exists* If a user desires to 
subdivide the faces of a box, the faces must be input as rectangles. Subdivi- 
ding a polygon requires entering the individual triangles desired* The user may 
wonder at the capricious-looking node breakdown that results from his polygon 
input. This occurs because shadowing solutions exist for triangles, but not 
polygons. After processing, the polygon’s triangles are combined for output 
as one node, but the user should be aware of this subdivision process in order to 
avoid duplication of node numbers. 

3, 3. 3. 7 Dimensional Units 


Nodal areas are carried in data storage for direct irradiation and radi- 
ation conductor calculations. For this reason, surface data length inputs must 
be in feet, the standard TRASYS length unit* Convenient means of units control 
are provided by D-cards (Re-p 3.3.3,9*1>. 

In regard to the surface data block, the user needs to remember that all 
the linear dimensions he uses in defining the surfaces of his model must be in 
feet (after D-card manipulations) and that all angular measurements must be in 
degrees (and decimal fractions of degrees) of arc* 

3*3.3, 8 Properties Data 


In its present state of development, TRASYS is restricted to the assump- 
tions that all surfaces are ”grey", all surfaces emit diffusely, and all surfaces 
reflect with diffuse and specular components of reflectance. 




IR 


IR 


a 4*p + T = 1.0 

s s s s 


where: 

a = diffuse absorptivity 
p = diffuse reflectivity component 
p® = specular reflectivity component 
T = transmissivity 
subscripts: 

IR = infrared waveband 

s = solar waveband REV, 1 

3-43 


Precedins page blank 






A form f 'Victor request matrix is a triangular matrix of the same form as 
a form factor matrix. It is used for detail direction of form factor computations 
and finally for storage of the form factors. This is done as follows: prior to 

computing each form factor, the corresponding value in the request matrix Is 
examined; if it is zero or greater than zero, it is presumed to be a valid form 
factor and is left in the matrix unchanged; if less than zero, the form factor Is 
computed and stored in place of the negative number. 

Prior to any form factor calculations, the following operations are per- 
formed on the request matrix, in the order indicated . 

1. Matrix set every\4iere to "1.0„ 

2. Matrix overwritten with all form factors on RSI/RTX tapes. 

3. Values of 0.0 set per ZERO cards. 

4. Values of 0,0 set per ONLY cards* 

5. Values of -1.0 set per RECOMP cards (overrides values on restart tape), 

6. Set individual form factor values per form factor data cards. 

Operations 3 through 6 happen only if a form factor data block is pres- 
ent, Note that these operations enable the user to: a) arbitrarily set all form 

factors from a given node to zero if it is knoxim to be ”out of sight" of the re- 
maining nodes; b) Compute only the form factors from selected nodes, setting all 
other form factors to zero; c) Recompute form factors knoim to be in error on the 
restart tape(s); and d) Set individual form factors to any value desired. 

The above discussion applies to a single problem geometry. If more than 
one geometry exists in a given job, multiple sets of request matrices are involved 
The form factor data block provides for definition of as many request matrices as 
required . 


3*3. 5.1 Variable Definitions 


Form factor data block designators are defined in Table 3-V. 


COL. 1 DESIGNATOR 
VARIABLE NAME 

RANGE 

DEFAULT 

VALUE 

DESCRIPTION 

FIG 

Hollerith, 6 
Characters, Max. 

None 

Configuration Name. 

Nf.DEA 

1-99999 (Integer 
Array) 

None 

Node Identification No. 
Array, 

INITL 

Any floating point 
number 

Ref Section 
3.3»5.2-3 

Used to initialize the 
FF Request Matrix 

IR, SOL, BOTH 
or BLANK 

N/A 

Both 

Indicates data for IR, Solar 
or Both Request Matrices. 

ONLY 

N/A 

None 

Indicates "ONLY” option. 

REC0^^P 

N/A 

None 

Indicates "RECOMP” option. 

ZERO 

N/A 

None 

Indicates "ZERO” option. 


Table 3-V Form Factor Designators Definition 
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3. 3. 5. 2 


Form Fac tor Data Formats 


1) FIG cards are entered according to the following format: 

CCl CC7 CC7 

2 


FIG GNAME 


The FIG card may precede or follovr the NODEA Army 

2) The NODEA array is entered according to the following format 


CCl 


CC7 


NODEA NNl, NN2, . . . NNN, END 


CG7 

2 


for an N-Node matrix. The NODEA array may precede or follow 
the FIG cai'd. The node numbers must be entered in the exact 
order that results from the surface data block and the order 
of BUILDG and ADD calls in the operations data block. For 
this reason, the chances of a user-written node number matrix 
being valid for a large problem are remote. When a node 
array is needed, use Subroutine FFNDP (Ref. Section 3. 3. 5. 6). 

NOTE: The node array is required only, when individual form 

factors are to be defined in the form factor data block, or 
when equivalent form factors (Section 3. 3. 5.4) appear. If 
all records in the FORM FACTOR DATA BLOCK utilize one of the 
condensed formats pertaining to an entire row and column, 
then a Node Array is not required. 

NOTE: That R and Z may be substituted for RECONP and ZERO 

respectively in the formats given below. 


3) CCl CC7 

INITL DV 


This card is usually not required. It may be used when FFs are 
not being obtained from RSI or ONLY or RECOMP options are not 
being used. If not set by the other options or the user it 
will default to -1.0. 

4) Single form factors are entered according to the following 
format : 


CCl 

WBAND 


CG7 


NA, NB, DV 

where; NA, NB, and DV correspond 
respectively to I, J and the FA 
product in the expression; 


*^1 J ^JI 


DV 


CC7 

2 
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3,3.8 


Correspondence Data 
Basic Concepts 






3 . 3 . 8.1 


The correspondence data block performs the function of pLOvidiiig the 
user with an input point for the node numbering data necessary co make his 
thermal radiation model correspond on a one-to-one basis with his thermal 
analyzer RC (Resistance Capacitance) model. 


The user has the choice of using the information in this block In the 
form factor segment to combine form factors or waiting to use it in the absorbed 
heat output (QOCAL) and radiation ejcchange output (RKGAL, RCCAL) processor seg- 
ments. Sometimes^ it is desirable to combine in the form factor segment because 
computation time in the radiation interchange computation segment (GBCAL) can 
be decreased, sometimes drastically^ if the form factor matrix Is reduced sig- 
nificantly. Two sources of error arise with form factor combining, however. 

If surfaces with differing optical properties are combined the radiation Inter- 
change computations are approximate because they proceed on the basis of area- 
weighted average optical properties. The second source of error is the so- 
called **fence** problem. Consider the 4-node configuration; 


3 


4 


1 j ' 2 


Clearly, form factors between nodes 4 and 1 and 3 and 2 do not exist. If 
nodes 1 and 2 were combined, however, form factors ^ 2 ^4 12 

exist, and GBCAL calculations would produce a radiation interchange factor 
between 3 and 4, obviously incorrect. Obviously this can cause erroneous 
absorbed heating computations also. 

The user may avoid these situations and still take advantage of form 
factor combining by splitting his correspondence data. One set of correspon- 
dence data, with no optical property combination or fence problems, is entered 
and used in form factor combining. The remaining correspondence data necessary 
to make the TRASYS model agree with the RG model is entered separately, and 
will be applied only in the absorbed heat and radiation interchange output 
segments. 

Three other sets of correspondence data, not entered by the user, but 
implicit to the program, is the correspondence data file that automatically 
recombines polygons. For this one the user has control in the GMGAL link of 
whether or not this is done (reference Section 5.10.) The other automatic 
applications of correspondence are the equivalent correspondence generated for 
Auto BCS DUP and Auto BGS IMAGE Options (reference Sections 3.3.3.10.3 and 
3*3.3.10.4). The user has control of whether this is accomplished in the 
Correspondence Data Block. 




EEV. 1 
3-81 


3. 3*8-2 Variable Definitioas 


Correspondence data block variables are defined in Table 3-VI* 



RANGE OR 

DEFAULT 


VARIABLE NAME 

OPTIONS 

VALUE 

DESCRIPTION 

FIG 

CNAJIE 

NONE 

CONFIGURATION NAME 

CF 

BLANK OR 
FF 

BLANK 

FLAG DESIGNATING CORRESPONDENCE DATA 
FOR FORM FACTOR COMBINING 
FF CORRESPONDENCE DATA WILL BE 
APPLIED TO FF's IN CM LINK 
BLANK CORRESPONDENCE DATA WILL BE 
APPLIED IN THE ABSORBED HEAT LINKS 
AND RADIATION CONDUCTOR LINKS 


Table 3-VX Correspondence Data Variable Definition 


3. 3. 8. 3 Correspondence Data Formats 

1) FIG cards are entered according to the following 

CCl CC7 CG7 

2 

FIG CNAME, CF 


format: 


2) Node correspondence data is entered according to the following 
format : 


CC7 

NODID = DVl, DV2, — DVN 

NODID is an RC model node number (one to five digits ^ integer) 
and DVl through DVN are the TRASYS node numbers that will be 
combined into node NODID, 


3) When correspondence data is entered for nodes within a BCS that 
was duplicated under the BCS DDF or BCS IMAGE options, corres- 
pondence data for the nodes generated by this duplication pro- 
cess may be created by an additional node number at the end of 
each correspondence data card* For instance: 

NODID - DVl, DV2, . • , DVN/ 100 

will generate two correspondence data cards as follows; 
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3. 3. 9. 3 BUILD Option 

This option provides the user the convenience of defining the geometry 
for a configuration (in terms of block coordinate system nsimes) with a single 
card rather than through series of user calls to subroutine BUILDC and ADD, as 
previously required by TRASYS I. 


Format 

CCl CC7 

BUILD FIG, BLKl, BLK2, BLK3 


CC7 

2 


This is equivalent to the sequence 
CC7 

CALL BUILDC (BLKl, 3HFIG) 

CALL ADD (BLK2) 

CALL ADD (BLK3) 

note that the configuration name (FIG in the eKample) must begin to the right 
of card column 6. The BUILD option may continue for as many cards as required 
to list all of the Block Coordinate System (BCS) names that make up the desired 
configuration. A continuation flag is required when more than one card is 
needed. A BCS name should not be split between cards. 


A BUILD card with columns 7-72 blank will automatically default the 
Configuration name to the Model name given in the Option Data Block and all 
BCSs specified in the Surface Data Block will automatically be' listed to com- 
prise the configuration. If there is no model name in the Options Data Block, 
then the Model name will default to THING. 


If the configuration name is the same as a BCS name and the BCS name 
does not exist in the configuration the preprocessor will flag the configuration 
name as an error. For example if in the Surface Data Block there are BCSs with 
the names NEW, BLKl, 6LK2 and it is desired to build a configuration in the 
Operations Data Block with only BLKl and BLK2 this configuration cannot be 
called NEl-J. 

3. 3. 9, 4 Operations Blocx Formats 


1) Step number cards are punched according to the following format 


CCl 

STEP 


CC7 

DV (integer) 


CC7 

2 


where DV is the integer step number, with the allowable range 1 
to 9999. Positive step numbers are required in the Operations 
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Data Block for only the DI and DR computation links. They must 
be specified by the user for each orbit point; or if ORBGRN is 
used, they will be specified by the program. For other than DI 
and DR computations, the user may use positive step numbers as 
in TRASYS 1. If they are omitted the program will insert nega- 
tive step numbers only where required. This eliminates the 
confusion TRASYS I users previously had on what constitutes a 
Step. The elimination of user step numbers was possible by 
replacing it with the more meaningful label, the configuration 
name. 

2) Subroutine calls are made in the classic FORTRAN format, with the 
word CALL beginning in CC7. Calling sequences for each user- 
accessible processor routine can be found in Appendix D. 

3) Computation segment (link) calls are made using the following 
format : 


CCl 

L 


CG7 

SEGNAM 


CC7 

2 


\fliere SEGNAM is the name of one of the program segments contained 
in the processor library. Appendix E describes the processor 
segments and their functions. Currently allowable options for 
SEGNAM are: NPLOT, OPLOT, SFCAL, FFCAL, REGAL, CMCAL, DICAL, 

DRCAL, GBCAL, RKCAL, RCCAL, AQGAL, QOGAL, and PLOT. 

3. 3, 9. 5 Operations Block Examples 


Operations block structure and function is illustrated by the listings 
of sample operations blocks in Figure 3-20. 


Sample 1 of Figure 3-20 is a single step operations block that generates 
three node plots of a single geometry. Sample 2 is a two-step operations block 
that generates form factor matrices for two geometric configurations. Sample 3 
is a 17-step operations block that generates direct irradiation data at 16 points 
in orbit, including the planet shadow in/out points. A geometry change at the 
shadow in/out points is involved. Sample 4 is a listing of the operations data 
block for a restart run that recalculates shadow factors, reads form factors, 
combined form factors, and gray body factors from the RSI tape, calculates radia- 
tion conductors (RADKs are always calculated since they are not saved on restart 
files), and recalculates direct fluxes using shadow factor tables. 
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Sample <1 — Orbit Generation from a>t Olu-GKN Card 


'x,y 


c ORBIT GENERATION CARD FOLLOWS 
ORBGEN CIRP, 0.0, 360.0, 4, AQ 


I 




c * * 
STEP 


L 


L 

STEP 

STEP 


L 

L 

STEP 


L 

L 

STEP 


L 

L 

STEP 


L 

L 

90000 

STEP 


********* ORBIT GENERATION STARTS HERE ********* 

10000 

TRUEAN = 0. 

TRUANF = 360.000 

TRUANI = 0. 

lAI = 0 

IAS = 0 

PLTYPE = 6HPLSAVE 

CALL DICOMP (0,0,0) 

DICAL 

NSPFF = 10000 

PLTYPE = 6HPLREAD 

CALL AQDATACIAI, IAS, 0,0,0) 

AQCAL 

10001 

CALL STFAQ (TRUANF, 0,0, 1000) 

10002 

TRUEAN = 90.000 

CALL DICOMP (0,0,10000) 

DICAL 

CALL AQDATAdAI, IAS, 0,0,0) 

AQCAL 

10003 

TRUEAN = 180.000 

CALL DICOMP (0,0,1000) 

DICAL 

CALL AQDATAdAI, IAS, 0,0,0) 

AQCAL 

10004 

TRUEAN = 270.000 

CALL DICOMP (0,0,10000) 

DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

AQCAL 

10005 

IF(SHADIN.LT.O.) GO TO 90400 

TRUEAN = SHADIN-0.1 

IF (TRUEAN . LT . TRUANI . OR . 

TRUEAN. GT. TRUANF) GO TO 90000 

CALL DICOMP (0 .4HZERO , 10000) 

DICAL 

CALL AQDATAdAI, IAS, 0,0,0) 

AQCAL 

CONTINUE 

10006 

TRUEAN = SHADIN+0.1 . 

IF (TRUEAN . LT . TRUANI . OR . 

TRUEAN. GT. TRUANF) GO TO 90100 
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Sample 4 — Orbit Generation from an JliBUEN Card (continued) 

CALL DICOMP (0,0,10000) 

L DICAL ^ 

CALL AQDATAdAi, IAS, 0,0,0) 

AQCAL 

90100 CONTINUE 
STEP 10007 

TRUEAN = SHAOUT+0.1 

IF (TRUEAN , LT . TRUANI ,OR . 

TRUEAN. GT.TRUANF) CO TO 90200 

CALL DlCOtff (0 , 4HZER0 , 10000) 

L DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

90200 CONTINUE 
STEP 10008 

TRUEAN = SHAOUT-0.1 

IF (TRUEAN. LT . TRUANI .OR. 

TRUEAN. GT.TRUANF) GO TO 90300 

CALL DICOMP (0,0, 10000) 

L DICAL 

CALL AQDATAdAi, IAS, 0,0,0) 

L AQCAL 

90300 CONTINUE 
90400 CONTINUE 

CALL Q0DATA(3HALL, 0,0, 0,0,0, 0,0,) 

L QOCAL 

C 

it ******** ORBIT GENERATION ENDS HERE *********** 

Sample 5 — Operations Block for Restart Run 

HEADER OPERATIONS DATA 

STEP 1 

BUILD CNA^E,BNAME 
GALL RSTOFF 
L SFCAL 

CALL RSTON 

CALL FFDATA(0,0,0, 0,0,0, 0,2HNO) 

L FFCAL 

I CALL CMDATA(0,5HFFNEW,FF, 0, 0) 

L CMCAL 

CALL GBDATA(4HBOTH,0,2HCM) 

L GBCAL 

I CALL RKDATA(0,2HNO,0,100,5HSPACE,999,0,0,2HNO,0) 

L RKCAL 

CALL ORBIT2(3HEAR,0.,90.,0.,0.,0.,100,*6080.,0.) 

CALL DIDT2S(0,0.,180.,0.,0. ,0. ,100. *6080. ,2HNO,0) 

I CALL RSTOFF 

L DICAL 

END OF DATA 
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4, 3, 3, 2 Subroutine CMDATA 

Calling sequences: CALL CMDATA (NFIGFF, NFICCO, NFFTYP, lAUTOC, 

CMPRT) 

NFIGFF and NFIGCO are configuration names. The CKCAL segment 
will retrieve form factors (or image factors) stored under the name 
NFIGFF, combine them bv applving CORRESPONDENCE DATA defined under 
configuration NFIGCO and itore the resulting matrix under the current 
configuration name* both these variables default to the current con- 
figuration name, as defined on the most recent BUILD Card. NFFTVP 
alerts CMCAL to the type of form factors to be found under NFIGFF* 

FF means ordinary form factors. RB means image factors, as generated 
by the RBCAL segment. If lAUTOC is entered as NO, polygons will 
remain uncombined, CMPRT is the print/no print flag for the combined 
form factors. CMPRT defaults to YES (NO for CDC version). If CMDATA 
is not called, CMCAL proceeds on the basis of default values, 

4 . 3 . 3 . 3 Adiabatic **Closure^^ Surfaces 


It is sometimes desir''.ble to conserve energy in computing the 
IR radiation interchange factors in a thermal radiation problem that 
does not constitute a complete enclosure. The usual means of doing 
this is to complete the enclosure with an adiabatic reflector surface* 
This can be accomplished by entering a rudimentary closure surface in 
the surface data and using subroutine ADSURF to add the closure surface 
to the form factor matrix after form factors have been computed for the 
real surfaces in the problem* The ADSURF call should be followed by a 
GBDATA and a RKDATA or RCDATA call. An example of the application of 
this technique is shown in Appendix J* 

Subroutine ADSURF 


Calling Sequence: CALL ADSURF (BCSN, NFIGFF, AREA) 

BCSN is the block coordinate system name under which the 
closure surface appears in the surface data. Only one side of enclo- 
sure surface can be active, NFIGFF is the configuration name under 
which the new modified form factor matrix is to be stored* 

When ADSURF is called, the form factor matrix is read under 
the current configuration name, and form factors from each node to 
the closure surface are computed by subtracting the form-factor row 
sums from 1*0. This new row of form factors is added to the form 
factor matrix and the resulting matrix is stored under the name given 
for NFIGFF, 
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AREA Is the area of the adiabatic closure surface. I; 
desired, the area in square feet may be entered as this argument 
IF it is more convenient, the closure surface can be defined with the 
correct dimensions in the surface data block and the area will thus be 
computed. To use the computed area, enter 0 (zero) for this argument. 

A subsequent GBDATA call must be made with the First and bast 
arguments always as shown, (’.all C5BDATA (2HIR,6HNFTGFF,2HFF) 

<+.3.3.4 Subroutine RliDATA 

Calling sequences; CALL RBDATA (NFIGFF, FFACC, FFACCS, FFRATL, 

FFPRNT) 

Subroutine RBDATA is used to define the parameters necessary 
to execute the RBCAL program segment that computes form factors (also 
known as image factors) that include the effects of specular surfaces 
in the model. NFIGFF is the configuration name used by RBCAL to 
retrieve the ordinary form factors previously computed by FFCAL. 

NFIGFF defaults to the current model name. The remaining RBDATA 
parameters are the same as defined under FFDATA and carry the same 
default values. If RBDATA is not called, RBCAL proceeds on the basis 
of default values. 

4.3.4 Plot Package Subroutines 

4. 3.4.1 Subroutines NDATA, NDATAS 

Calling sequences: CALL NDATA (NV, VU, SCL, NACT, ISHO, SELN, TIT, 

IROTX, IROTY, IROTZ, ROTX, ROTY, ROTZ) 

CALL NDATAS (NV, VU, SCL, I’ACT, ISHO) 

These calls are used to define plot parameters prior to 
executing the NPLOT program segment. A call to one of these routines 
prior to an NPLOT execution is not mandatory, because all arguments 
have default values (ref. Appendix D) . Shadow-only surfaces (ref. 
Section 3.3.3.11) are not included in the node plots unless argument 
ISHO is entered as YES . The variables defined by NDATA or NDATAS 
calls will hold for any subsequent NPLOT execution in the operations 
block. 
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PNANE is a Hollerith name used as a fla^^ to direct the 
definition of the planet-dependent parameters. The allowable PNA^^E 
options are; 3HMER, 3HVEN, 3H1£AR, 3HM00, 3RMAR, 3HJUP, 3HSAT, 3UNEP, 
3HITRA, and 3HSUN. These names serve to define the following vari- 
hles which are set by the ORRITl or 0RBIT2 call. If the User wants 
to change anv of the variables they must be redefined to the new values 
after one of the ORBIT Subroutine Calls in the OPERATIONS DATA Block. 

PRAD - planet radius 


SOL - solar constant .at the average planet-sun 
distance 

PALB - planet albedo value (surface solar re- 
flectance) 

WDS - infrared emissive power at planet 
surface, dark side 

WSS - infrared emissivt* power at planet sur- 
face ^ subsolar point 

C5RAV - acceleration of gravity at planet surface 

The values obtained from the different planet name 
arguments are tabulated in Table 4"1* Note that the values 
tabulated are in metric units. The values stored in core, 
however, are in the TRASYS base units system, that is, length 
in feet, time in hours, energy in British thermal units. If 
the user desires to manipulate these quantities using his own 
operations block FORTRAN code, he would expect them to be in the 
ft - hour - Btu units. 

Note that only Mercury and the Earth’s moon are treated 
as bodies with nonuniform surface temperatures. This is correct 
for airless, slow- rota ting planets. For these two bodies, the 
emissive power is considered everywhere constant on the dark 
side. On the sunlit side, the emissive power reduces from the 
subsolar value to the darkside value at the terminator, accord- 
ing to a cosine law. 

The user is cautioned that his results using PNAME = 
3HMER may be extremely misleading. This planet’s eccentric 
orbit, plus its nearness to the sun, results in a solar constant 
variation of from approximately 6 to over 10 Earth "suns" during 
the Mercury year. Corresponding variations in the subsolar 
emissive power occur. The recommended procedure for PNAME — 
3HMER is for the user to properly define SOL and WSS according 
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Table 4-1 Stored Planet Property Values 


Planet 

Planet 

Radius 

Ckm)^ fft) 


Albedo 

Solar Constant 
at Mean 

Planet Distance 

(B/rt^-hr) 

Darks ide 
Emissive Power 

fw/m^) ^ (B/ft^-hr) 

Subsolar 
Emissive Power 

(w/m^) ^(B/ ft^-hr) 

Planet 

Gr av i ta t iona 1 
Constant 

fm/s^)‘^(ft/s^) 

Mercury 

2485. (8.153 E06) 

0,058 

8920. 

(2830) 

0. (0,) 

8402, 

(2666.) 

3.513 

(11.49) 

Venus 

6199. (20.34 

E06) 

0.76 

2570. 

(815,5) 

154.2 (48.93) 

154.2 

(48.93) 

8.462 

(24.68) 

Earth 

6370. (20.90 

E06) 

0.30 

1352. 

(429) 

236.6 (75.08) 

236.6 

(75.08) 

9.844 

(32.20) 

Moon 

1738. ( 5.702 E06) 

0.047 

1352. 

(429) 

6*5 (2.060) 

1288. 

(408.7) 

1.622 

(5.306) 

Mars 

3314.(10.87 

E06) 

0.148 

577.3 

(183.2) 

123.0 (39.03) 

123.0 

(39.03) 

3.921 

(12.83) 

Jupiter 

69885. (229.3 

E06) 

0.51 

49.6 

(15.74) 

6.1 (1,936) 

6.1 

(1.936) 

26.04 

(85.18) 

Saturn 

57515. (188.7 

E06) 

0.50 

14.7 

(4,66) - 

1.8 (.5711) 

1.8 

(.5711) 

11.17 

(36.54J 

Uranus 

25482. (83.61 

E06) 

0.66 

3.65 

(1.16) 

.31 (.0983) 

.31 

(.0983) 

11.52 

(37.68) 

Neptune 

24850, (81.53 

E06) 

0.62 

1.48 

(.47) 

.14 (.0444) 

.14 

(.0444) 

8.977 

(29,36) 

Sun 

698500. (2291. 

E06) 




6.262 X 10^ 

6.262 X 

10^ 

273.8 

(895.6) 

^Values 

Stored in program are in ft. 
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2 




h 2 2 2 

Referenced to 1352 w/m (429 Btu/hr-ft ) at 1 AU. Values stored in program arc in Btu/ft -hr. 


c . 2 

Values stored in program are in Btu/hr-^ft , 

d 2 

Values stored in program are in ft/s . 






/ 


V 


In the present version of TRASYS, DRCAL does not compute the specular 
" component of planetary irradiation because it is not felt that the compute 

time is justified. The flow diagram for segment DRCAL Is shown in Figure S-W. 
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ROUTINE 


USER 

ROUTINE 


Figure 5-12 Segment DRCAL Flow Diagram 









Fujupe B-2 Eppop ^haraaterisHcs for Identical^ Farallel^ 
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when- K ib 'I proput Lionality constant. 

A n*ore gtnoraJ form of Equation [B-2] , considering that 
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MTRAP version 1,0, LOMRP, and TRASYS use Equation B-2, modified with 
a shadowing constant, to compute form factors. The total number (i.e., 
size) and distribution of elemental areas is left to the user to define 
in bfPRAP version 1,0 and LOEIARP. The number of elements to be selected 
is defined by the closest node a given node "sees," The selection of 
elements, however, usually ends up being somewhat arbitrary or simply a 
matter of economics; i.e,, the finer the grid, the more machine time 
required. In reality, the selection of elemental areas is an independent 
problem for each form factor. 

The basic assumption for reasonably accurate form factors is, from Equa- 
tion 3-6 , that the elemental area size is small compared to the separa- 
tion distance between two elements. 

The TRASYS program uses a technique using Equation B-6 to automatically 
select the element grid sizes of each node pair consistent with a user- 
defined accuracy parameter, FFACC. If all elemental areas on each of 
two nodes were the same size and had the same separation distance, 
the apparent number of elements on a node to satisfy the accuracy 
value FFACC would be (from Equation B-6 ) 

A_ A_ cos 0. cos 0. 

W = — £ = — i i ^ R 7 

"l A. (FFACC) - 2 ' 

3- r.j 


Since each element pair on the two nodes may have a different separation 
distance, a different apparent number of equal-sized elements will be 
required. 

The approach used in the TRASYS program is a simple arithmetic average 
of element contributions, i.e,, 

m. 

I ^i ^ 

I \ptj. (FFACC)m^ nij 
" i=l 

where m. and m. are the initial number of elements arbitrarily chosen 
for nodes I and J. 

The inLtial number of elements is chosen just large enough for a 
representative sample. A similar optimum number of elements for node 
J can be defined. 


m. 


^ cos 9* cos 0* 
3- J 




r. . 
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TRAILER RECORD FOllMAT 

Words 1 through 3 coatain record number, date, time 
Words 4 through 9 contain SHENO 

Words 10 through 12 contain record number, date, time 

CORRESPONDEHCE DATA PSEUDO-FILE FORMAT 
Record 

1 HEADER (contains CORRES or CORRFF as label) 

2 THRU N - Correspondence data records. Each record 100 words or number 
of nodes words long, whichever is least. 


N + 1 Trailer record 
PROPERTY ARRAY PSEUDO-FILE FORMAT 
Record 

1 HEADER (contains PROPBD or PROPCG as label) i 

2 4HN0DE, NNOD, (NODE(I), I = 1,M0D)* 

3 4HAREA, NNOD, (AREA(I), I = l,NWOD)* 

4 5HEMISS, NNOD, (EtllSS(I), I = l,NNOD)* 

5 5HALPHA, NNOD, (ALPH(I), I = l,NMOD)* 

6 4HTRIR, NNOD, (TRIR(I) , I = l,NNOD)* 

7 4HTRSO, NNOD, (TRSO(I), I 1..NNOD)* 

8 4HSRIR, NNOD, (SRIR(I), I = 1,NN0D)* 

9 4HSRSO, NNOD, (SRSO(I), I = 1,NN0D)* 

10 Trailer record 

If label is PROPCM, records 10 and 11 contain: 

10 4HIGCMB, ICMBL, (ICCMB(I), I = 1,IC^IBL)* 

11 Trailer record 
where : 

NODE = Node identification numbers 
NNOD = Number of nodes in problem 


AREA 
EMISS 
ALPHA 
TRIR 
TRSO 
SRIR 
SRSO , 


Node surface properties (Ref. Table III-3) 


’'Note: All data records begin and end with record number, date and time 
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ICMBL *s Length of ICOMB array 

IGOtlB = Array of combined node identification numbers 

DICAL PSEUDO-FILE FORMAT 
Record 

1 Header (label == 5HDICAL) 

2 NNOD, TMEPR, TRUEAN, (NODE (I), 1 = l,NNOD)* 

3^ NEPT, SHADR, SHADP, ((PLAVT(I, J) , I = 1,NEPT) J= 1,3)* 


4^ 

(SUMR(I), SIMP (I) 

, I = 1,NEPT)* 

2*NN0D+2 

NNOD, (QDS (I), 

I = 1,NN0D)* 

2*NN0D+-3 

NNOD, (QDR(I), 

I = IjNNOD)* 

2*NN0D+4 

NNOD, (QDP (I), 

I = 1,NN0D)* 

2*NN0D+5 

Trailer record 



where : 

NNOD = Number of nodes 

TIMEPR “ Orbit time 

TRUEAN = True anomaly 

NODE = Node identification numbers 

NEPT = Number of elements on planet 

SHADR = Node - planet shadow factor (solar waveband) 

SHADP = Node - planet shadow factor (IR waveband) 

PLAVT = Planet element area vectors (3 components) 

SUMR - Form factors from node to planet elements (solar waveband) 

SIMP = Form factors from node to planet elements (IR waveband) 

QDS , QDR, QDP = Incident solar, albedo and planetary flux values 

^NCTES; Records 3 through 2*NN0D+1 exist only for circular planet 
oriented orbits. Otherwise this pseudo-file contains 6 
records only. 

*A11 data records begin and end with record number, date and time. 


I NOTE: These 

\ arc redundant 
f with SHFAC 
I pseudo file. 
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SUBROUTINE NAMES ; DIDTi , DIBTIS 

PURPOSE: 


Calls to define direct irradiation shadowing and accuracy parameters and 
to compute heat source position vectors from true anomaly or time, 

DEFINITIONS : 


Variable 

Names 

Default Values 

DINOSH - 

shadow/no shadow flag (Options: 4HN0SH, 4HSHAD) 

4HSHAD (shadow 
calculations not 
bypassed) 

DIACC - 

element selection accuracy factor for node/planet 
form factors 

0.25 

DIACCS - 

eleir.eiit selection accuracy factor for shadowing 
calculations 

0.10 

TRUEAN - 

true anomaly. If TIMEPR is entered TRUEAN will be 
computed 

None 

NSPFF - 

step number reference to obtain node- planet form 
factors if desired 

0 (new form 
factors computed) 

TIMEPR - 

time 

None 

DIPNCH - 

flux punch flag (Options: 3HYESj 2HN0» 4HTAPE*^ 

2HN0 

ISFAC - 

flag to write shadow factor on RSO for printout on 
subsequent runs (Options: 3HYES, 2FH0) 

2HN0(CDC) 
3HYES (UNIVAC) 


RESTRICTIONS : 


Either TRUEAN or T3MEPR must be defined in call. 

CALLING SEQUENCE : 

CALL DIDTI (DINOSH, DIACC, DIACCS, TRUEAN, NSPFF, TIMEPR, DIPNCH, ISFAC) 
CALL DIDTIS (TRUEAN, NSPFF, TIMEPR, DIPNCH, ISFAC) 


NOTE : 

* writes BCD output, with line numbers to USERl file in Flux Data Block input 
Format . 


D-10 


SUBROUTINE NAMES ; < DIDT2, DIDT2S 

PURPOSE ; 

Calls to define direct irradiation shadowing and accuracy parameters and 
to compute heat source position vectors from look angles. 

DEFINITIONS ; 

DINOSH 
DIACC 1 

diaccs I 

NSPFF I Reference DIDTl 

DIPNCH \ 

ISFAC / 

SUNCL, SUNCO “ look angles to sun (clock, cone) in the VCS 
PLCL, PLCO - look angles to planet (clock, cone) in the VCSf^ 

TIMEPR - present time 
ALT - spacecraft altitude 

NOTE: * Allowable ranges of SUNCL, PLCL are 0 to 360 degrees. 

** Allowable ranges of SUNCO, PLCO are 0 to 180 degrees. 


RESTRICTIONS ; 

These calls must be preceded by a call to ORBITl or 0RBIT2. The purpose 
is to define the orbit -centered body and set the variables PRAD, SOL, PALB, 

WDS and WSS. A call to ORIENT is required if the CCS and the VCS are not 
coincident. 

Subroutine SPIN should not be used with DIDT2 or DIDT2S. 

CALLING SEQUENCE ; 

CALL DIDT2 (DINOSH, DIACC, DIACCS, NSPFF, SUNCL, SUNCO, 

PLCL, PLCO, TIMEPR, ALT, DIPNCH, ISFAC) 

CALL DIDT2S (NSPFF, SUNCL, SUNCO, PLCL, PLCO, TIMEPR, ALT, DIPNCH, ISFAC) 
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SUBROUTINE FFDATA 

PURPOSE : 

This subroutine will define parameters used in FFCAL if other than 
default values are used, 

PEF INITIONS .: 


Variable Name Default Values 


FFACC - orientation accuracy factor 0,05 

FFACCS - shadowing accuracy factor 0.1 

FFNOSH - shadowing override flag (4HNOSHj 4HSHAD) 4HSHAD 

FFHATL -* distance/area ratio factor 15,0 

FFMIN - eliminate small form factors l.E-6 

FFPRNT " flag to print form factors (3HYES, 

2HN0) 3HYES 

FFFNGH - flag to punch form factors (3KYES,2HN0,4HPALL*,4HTAPE**) 2HN0 

FFNAC “ node array check flag (3HYES,2HNO) 3HYES 


* 4HPALL will punch all form factors (UNIVAC version) 

** Writes form factor output to the USERl file in form factor data 
^ block format* 

RESTRICTIONS : 

None 

NOTES: Example; CALL FFDATA (0,, 0*, 4HN0SH, 0, l,E-3, 0, 3HYES, 3HYES) 

Results in no shadowing computations , form factors below 0.001 
ignored, form factors printed and default values used elsewhere. 

If value passed is zero, default value assumed, 

CALLING SEQUENCE : 

CALL FFDATA (FFACC, FFACCS, FFNOSH, FFRATL, FFMIN, FFPRNT, FFPNCH, 

FFNAC) 

RELATED INFORMATION : 

1, The statement IFFSHO = 2HN0 prior to a call to the FFCAL link will bypass 
Form Factor computations to SHADOI^R only nodes. IFFSHO defaults to 3HYES* 

2, FFPNCH defaults to punch calculated form factors if RSO tape is not 
specified. 
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SUBROUTINE NAtlE ; FENDP 
PURPOSE: 


This subroutine Is used to obtain a node number array, punched on 
cards in format used in form factor, flux data, and Shadow Factor data blocks. 

RESTRICTIONS : 


None 

CALLING SEQUENCE : 
CALL FFNDP 


4 


REV 


1 


SUBROUTINE MAME; 


ORIENT 


PURPOSE; 


To define spacecraft orientation relative to orbital heat sources. 
DEglHITlOHS; 


Variable Names Default Values 

TYPE - orientation type None 

IROTX - order of rotation about x-axis 1 

IROTY - order of rotation about y-axis 2 

IROTZ - order of rotation about z-axis 3 

ROTX - rotation about VOS x-axis to rotate VGS into CCS 0« 

ROTY - rotation about VCS y-axis to rotate VCS into CCS 0. 

ROTZ - rotation about VCS z-axis to rotate VGS into CCS 0. 


RESTRICTIONS ; 

Not recommended for use with DIDT2, DIDT2S, A call to 0RIENT must 
precede a call to DIDTl or DIDTIS. 

CALLING SEQUENCE ; 

CALL ORIENT (TYPE, IROTX, IROTY, IROTZ, ROTX, ROTY, ROTZ) 

NOTES: TYPE options are as follows: AHPLAN, 3HSUN, AHSTAR, 4HTAPE. 

Individual default values obtained by passing zero. 

RELATED INFORMATION ; 

Refer to Figure 4.6 for definition of terms. 
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SUBROUTINE NAME ; PLDATA 

PURPOSE: 


This subroutine defines parameters necessary to execute the data plotter. 


DEFINITIONS : 




Variable Name 

Description 

Options . 

Default 

IPLUNT 

Plot data flag 
(a composite 
Hollerith word) 

Letter 1: A - Absorbed None 

I - Incident 
Letter 2: F ■* Fluxes 
R - Rates 

Letters 3, 4, 5, & 6 (as 
required) 

S - Solar 
A - Albedo 
P - Planetary 
T - Total (Sum of SAP) 
ALL - All 

IPLSN 

Identifies steps 
to be plotted 

A. 3HALL 

B. Name of Array of step 
numbers- Steps do not 
have to be in any order 

SHALL 

IPLNA 

Identifies nodes 
to be plotted 

A. SHALL 

B. Name of Array of node 
numbers 

SHALL 

PLCRVF 

Flag for curve- 
fitting 

3HYES, 2HN0 

3HYES 

PLLABX. 

Plot label X 

Array name (array length 
28 characters max.) 

Blanks 

PLIABY 

Plot label Y 

Array name (array length 
28 characters max.) 

Blanks 

PLTITl 

Plot label title * 
line 1 

Array name (array length 
58 characters max.) 

Blanks 

PLTIT2 

Plot label title 
line 2 

Array name (array length 
70 characters max.) 

Blanks 

PLXMPF 

X-axis multiplying 
factor 

Real no. 

1.0 

PLYMPF 

Y-axis multiplying 
factor 

Real no. 

1.0 

PLGMB 

Plots output with 

3HYES, 2HNO 

2HN0 


Correspondence ap- 
plied for current 
configuration name. 
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SUBROUTINE NAME; 


PURPOSE ; 


RCDATA 


This is a user-called subroutine that defines the parameters used in RCCAL 
for the condensation and output of radiation conductors (RACKS). 


VARIABLE DESCRIPTIONS AND DEFAULT VAI.UKS; 


Variable 

NFIGGB 


RKPNCH 

RKMIN 


IRKCN 


IRKNSP 

SIGMA 

RKAMPF 

RKTAPE 


NFIGCO 


Description 

Configuration name for gray body factor access 

Punch/ no punch flag. Options: 3HPUN, 2HNO 

Minimum value of that will result in a valid 
RADK. RKMIN TEST is not made on conductors to the 
space node. If NERN is POSITIVE the RKMIN test is 
applied to the sum of those connections discarded 
after the RFRAC requirement is satisfied. 

Initial radiation conductor number 

Flag for caluclation of RACKS to space. 

Options; 5HSPACE, 2HN0 

Space node number 

Stefan-Boltzmanu constant 

Area multiplying factor 

Flag to write RACKS to BCD tape. Options; 

4HT/PE, 2HN0. See Subroutine LIST for 
Related Information. 

Configuration name for correspondence data access 


Default Value 

Current Config, 
Name 

3HPUN 

0.0001 


32767 

1.713E-9 


Current config. 


RFRAC 


IPRIME 


ISECND 


Significant radiation fraction; radiation con- 
ductors of a node to be left intact divided by 
the sum of the node conductors 

Percentage of SLAST (last conductor value saved to 
meet RFRAC criterion) . Subsequent conductors will 
be saved if their values are greater than 
RTOL * SLAST. 

Effective radiation node (ERN) number. If NERN 
is negative, all ERN conductors will be printed 
but not punched or ^yritten to tape. 

Array name for array of primary MESS node 
mnnbers and special node numbers 

Array name for array of secondary MESS node 
numbers 
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RESTRICTIONS : 


RCDATA must be called prior to RCCAL execution since all of the variables 
are not defaulted. 


IPRIME and ISECND arrays must be input in the array data block to 
specif MESS node pairs and special nodes. IPMME contains a list of all 
primary MESS nodes and all special nodes in that order. ISECND contains a 
list of all secondary MESS nodes in IPRIME. 

CALLING SEQUENCE ; 

I CALL RCDATA (NFIGGB, RKPNCH, RKMIN, IRKCN, RKSP, IRKNSP, SIGMA, 

RKAMPP, RKTAPE, NFIGCO, RFRAC, RTOL, NERN, IPRIME, ISECND) 
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SUBROUTINE NAME; 


RKDATA 


PURPOSE; 


This subroutine defines parameters used in RKCAL for output of 
conductors (RADKS) . 

Variable Names 


radiation 


Default Value 


NFIGGB Configuration name for gray body factor access 

EKPNCH Punch/no punch flag. Options: 3HYES, 2HN0 

RKMIN Minimum value of ^ /« that will result in a valid 

RADK, Test not applied to conductors to space nodes, 


Current Config, 
name 

3HYES 

0.0001 


IRKCN 

Initial radiation conductor number 

1 

RKSP 

flag for calculation of RADKS to space. 
Options; 5HSPACE, 2HN0 

2HN0 

IRKNSP 

Space node number 

32767 

SIGMA 

S tefan-Boltzmann constant 

1.713E-9 

RKAMF 

Area multiplying factor 

I.O 

RKTAPE 

Flag to write RADKS to BCDOU tape- Options: 4HTAPE 

4HTAPE, 2HNO. See Subroutine LIST for Related 
Information 

2HN0 

NFIGCO 

Configuration name for correspondence data access 

Current Config 
name 


NOTES: If not called prior to RKCAL execution, default values will be 

assumed. Individual default values obtained by passing zero 
arguments . 


CALLING SEQUENCE ; 

CALL RKDATA (NFIGGB, RKPNCH, RKMIN, lEKGN, RKSP, IRKNSP, SIGMA, 
RKAMPF, RKTAPE, NFIGCO) 
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SUBROUTINE NAME ; RSTOFF , 

PURPOSE ; 

This subroutine is used to discontinue the reading of data from 
an RSI tape during a restart run. All operations following a call to 
this routine are performed as though it was not a restart run. 

RESTRICTIONS ; 

Call valid only during a restart run from an RSI tape. 

CALLING SEQUENCE ; 

CALL RSTOFF 

SUBROUTINE NAME ; RSTON 
PURPOSE ; 

This subroutine is used to re-establish the reading of data from 
an RSI tape following a call to RSTOFF. 

RESTRICTIONS ; 

Call valid only during a restart run from an RSI tape. 

CALLING SEQUENCE ; 

CALL RSTON 

ROTE; 


The judicious use of RSTOFF in conjunction with RSTON allox^s the 
user to insert, delete, and/or recalculate any operations in his 
Operations Data Block. 




REV. 1 


G-1 


APPENDIX G - TAPE NAME DESIGNATIONS AND SUMMARY INFOR^IATION 

I . TAPE/ FILE INFORMATION 

II. SUMMARY - USER TAPE/FI LE INFORMATION 
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TAPE NAME 

AVAILABILITY** 

NOUT 

PP/P 

DI 

PP 

RIO 

PP 

CMERG 

PP 

EMERG 

PP 

RSI 

PP/P 

RSO 

PP/P 

PNCH 

PP 

SCI 

PP 

SG2 

PP 

SC3 

PP 

CMPL 

PP 

SQNTL 

PP/P 

DIR 

PP/P 

PER 

PP/P 

GBIRR 

PP/P 

PLSR 

PP/P 

RTI 

P 

RTO 

P 

BCDOD 

P 


DESCRIPTION 
Print Output File 
Preprocessor Data Input File 
Random Access Data File 
CMERGE Tape 
EMERGE TAPE 

Permanent Restart Input Tape 

Permanent Restart Output Tape 

Punch Output File 

Scratch File 

Scratch File 

Scratch File 

Operations Data Compile File 
Sequential Data File 
Direct Irradiation Restart File 
Form Factor Restart File 
Correspondence Data Input File 
Shadow Factor Data File 
Temporary Restart Input Tape 
Temporary Restart Output Tape 
BCD Data Output Tape 
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FOIIEWORD 

The Martin Marietta Thermal Radiation Analyzer 
System (TRASYS) program marks the first instance that thermal 
radiation analysis has been put on the same basis as thermal 
analysis using program systems such as MITAS and SINDA. As 
with these thermal analyzer programs, the user is provided the 
powerful options of writing his o\m executive, or driver logic 
and choosing, among several available options, the most desir- 
able solution technique (s) for the problem at hand. In addi- 
tion, many features never before available In a single radia- 
tion analysis program are provided. 

Among the more important are: 

• 1000 node problem size capability with shadowing 
by intervening opaque or semi-transparent surfaces 

• choice of diffuse, specular or diffuse/specular 
radiant interchange solutions j 

• capability for time variant geometry in orbit; 

• choice of analytically determined or externally 
supplied $hadov7 data for environmental flux cal- 
culations ; 

• form factors and environmental fluxes computed 
using an internally-optimized number of surface 
grid elements, selected on the basis of user- 
supplied accuracy criteria; 

• A general edit capability for updating thermal 
radiation model data stored on tape, 

« A plot package that provides a pictorial repre- 
sentation of the user*s geometry. 


TKASYS is indebted to a number of predecessor pro- 
grams in the thermal radiation analysis field. The major con- 
tributors were HEATRATE, MERAP version 2.0, RADFAC and 
the MRI Computer Program for Determining External Radiation 
absorbed by the Apollo Spacecraft, 

This User's Manual represents a concerted effort to 
document the capabilities of TRASYS and will, hopefully, serve 
the t^ifofold purpose of instructing the user in all applications 
and serve as a convenient reference book that presents the 
features and capabilities in a concise, easy-to-find manner. 

This User's Manual was generated under NASA Con- 
tract NAS9-13033, "Development of a Thermal Radiation Analysis/ 
Heat Rate Computer Program System." The technical monitoring 
for this program was provided by Mr. Robert A. Vogt of the 
Thermal Technology Branch of the Structures and Mechanics 
Division, NASA Lyndon B. Johnson Space Center. His helpful 
suggestions during the development of TRASYS are gratefully 
acknowledged. TRASYS would not exist without the superb 
design and programming efforts of Messrs. R. E. Paulson and 
R. J. Connor, ^dio were responsible for generating the 
majority of the TRASYS code. Their efforts are gratefully 
acknowledged. Extensive thanks are also due Mr. G. M. 

Holmstead for his efforts in developing the direct irradiation 
program segment and for the valuable consulting effort he 
performed during the course of program development 
Mr. R, G. Goble is also recognized for his praiseworthy 
efforts in developing the specular-diffuse radiation inter- 
change segment, the orbit plotter segr-.ent, and for his 
solutions of many knotty problems that cropped up during 
program checkout. 
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1. INTRODUCTION 
1,1 WHAT IS TRASYS? 

The Thermal Radiation Analysis System is a digital 
computer software system with generalized capability to solve 
the radiation related aspects of thermal analysis problems. 

When used in conjunction with a generalized thermal analysis 
program such as the Systems Improved Numerical Differencing 
Analyzer (SINDA) program, any thermal problem that can be 
expressed in terms of a lumped parameter R-C thermal network 
can be solved. The function of TRASYS is ttrofold. It provides; 

a, Intemode radiation interchange data; and 

b. Incident and absorbed heat rate data from 
environmental radiant heat sources. 

Data of both types is provided in a format directly usable by 
the thermal analyzer programs. 

One of the primary features of TRASYS is that it 
allows the user to write his own executive or driver program 
which organizes and directs the program library routines 
toward solution of each specific problem in the most expedi- 
tious manner. The user also may write his own output routines, 
thus the system data output can directly interface with any 
thermal analyzer using the R-C network concept. 

Other outstanding features of TRASYS include; 

a, 1000 node allowable problem size, 

b. Time variable problem geometry allowed, 

c. Edit capability allowing the modification 
of thermal radiation models, 

d, A plot package that provides pictorial plots of 
input geometry and orbit data as well as output 
data. 
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The TRASYS system consists of two major components: 
(1) the preprocessor, and (2) the processor library. The 
preprocessor has two major functions. First, it reads and 
converts the user^s geometry input data into the form used by 
the processor library routines. Second, it accepts the users 
driving logic wit ten in the TRASYS modified FORTRAN language 
that directs user-provided and/or library routines in the solu- 
tion of the problem. The processor library consists of FORTRAN 
language routines that perform the functions commonly needed 
by the user. The user has, in some cases, a choice of solution 
techniques to perform the same function. 

1 . 2 SYSTEM STRUCTURE 

In the usual engineering environment, a programmer 
is commissioned to prepare an applications program which is 
subsequently made available to the engineer on a production 
basis. The engineer supplies input data and receives output 
data, as shorn in Figure 1-1, 



FIGURE 1-1: BASIC FLOW IN USING AN APPLI- 
CATIONS PROGRAM 

Changes to the logic and equations are difficult 
for the pro^^ram user to implement conveniently since they 
must be t'/ritten in a computer-oriented language and submittal 
may be required through a formal programming organization, 
t'Jhen TRASYS is used, hov/ever, the engineer need only call on 
the programmer to supply a standard deck of computer oriented 
“control cards" which will call the various elements of the 
system into action in the proper sequence. The engineer then 
formulates his problem in the engineering-oriented TRASYS 
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language^ assembling both data and solution techniques (i.e,, 
logic and equations) into this card deck, which then serves 
as the complete input to the TRASYS system. Programmer 
support has been minimized since the bulk of the programming 
effort is already built into the TRASYS preprocessor and pro- 
cessor library. The engineering user need only specify the 
data and the order and type of "program building blocks" which 
he deems necessary for the solution of his problem, as illus- 
trated in Figure 1-2. 



It should then be evident that TRASYS is much more 
than an applications program. It has, in fact, all of the 
functions and capabilities of a special purpose operating 
system. Since most computers in current use in engineering 
environments already have operating systems built around a 
FORTRAN compiler, TRASYS is designed to augment the existing 
FORTRAN system. Hence, the TRASYS library serves as an exten- 
sion to the existing FORTRAN library, and the TRASYS program 
serves as a preprocessor to (i.e., it proceeds) the existing 
FORTRAN compiler. This augmentation arrangement is illustrated 
in Figure 1-3. 
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when using the full capability of TEASYS, the engineer | 

will be required to exert a programming effort of sorts, in a ] 

language consisting of FORTRAN statements and problem oriented | 

TRASYS statements that are FORTRAN relrted. This* together with 
the wide variety of options and features offered by the system* 
suggests an appropriate word of caution: TRASYS is a comprehen- 
sive system which cannot be mastered overnight. The prospective i 

user should not assume that a cursory review of the Instruction i 

Manual xjill lead to immediate success* nor should he assume that 
this manual represents a "cookbook” which will eventually yield 
to a plodding and rigid adherence to each and every rule* In 

presenting instructions on the use of a computer program, it is j 

not possible to completely avoid some "cookbook- like" sections; 
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hoijever, every effort has been made to eKplain the "why" and 
"hOTfl" behind each rule, option, and feature, with the intent of 
encouraging the reader to think about and understand TRASYS in 
depth. To help the novice user, an attempt has been made to 
default much of the required input to normally used values so 
that the user need not define them. 








m 
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2. BACKGROUND INFORMATION 

2.1 TYPOGRAPHICAL CONVENTIONS 

2.1.1 Punched Cards 

The reader is (or soon will be) familiar with the 

standard 80 column punched card. It is the user’s primary means 
of conveying his input data and logic to TRASYS. 

The program input format design is predicated on mini- 
mum dependence upon data/tard column relationships. Most card 
input is covered by one column rule: card columns 1 thru 6 

inclusive comprise the control field and columns 7 through 72 
comprise the data field. Data in the control field are used by 
read routines to identify the type of data to expect in the 
cards* data field. In this manual, the typographical convention 
shown in Figure 2-1 will be used to Indicate the card columns 
of interest. (Card columns 1,7 and 12 in this case). 

CCl CC7 CCl 

2 

FIGURE 2-1; SAMPLE CARD COLUMN DESIGNATIONS 
Throughout the rest of the manual (in contrast to 
Figure 2-1) punched cards will not be identified as figures. 
Whenever material is presented with one or more indicators xjith 
the format CCX directly above, a punched card is indicated. The 
card data will always be presented as Gothic capitals and/or 
numerals. For example, a card format might be shown as follows; 

CCl CC7 CC7 

TITLE THIS IS A SAMPLE TITLE CARD ^ 0012 

In general, the character directly below the column 
number begins the relevant data field. 

2.2 FILE AND TAPE CONlHilNTIONS 

Since TRASYS can be implemented oh a variety of coni* 
puters, it is necessary to refer to data storage media by some 
nomenclature wliicJi will be independent of the pai'ticular system 
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configuration. FORERAN "logical unit numbers" are often used for 
this purpose, but were rejected for use in this manual because 
certain installations impose restrictions on the type of physical 
storage device which maj^ be assigned to a given unit. Instead, 
each serial access storage device referenced by TRASYS is given 
a proper name as follox-7s: 

"Purpose TAPE" 

Hence, for example, the Restart Output Tape contains the results 
of processing the user's data, and Edit Input Tape CMERG contains 
input for merging, using the edit routine, "Tape" is used as part 
of the name only because a reel of magnetic tape is normally asso- 
ciated with computer storage. However, any "Tape” may, in fact, 
be a disk file, a dirura file, a punched paper tape, or a magnetic 
tape, at the option of the user. Appendix G contains a list of 
the system-oriented unit designations for each of the "Tapes" 
mentioned in this manual, along xvith the recommended type of 
storage device to xThich these units should be assigned. 

On the other hand, when speaking in general about 
saving or retrieving data on or from a serial access storage 
device, the generic term "file" x^ill be used, 

2,3 TEMS AND DATA CONVENTIONS 

The words SUBROUTINE and ROUTINE are generally used 
interchangeably, A program SEQIENT is a specific collection of 
routines used to do a specific processing job, such as the cal- 
culation of radiation interchange factors. Generally, the rou- 
tines con^rising a segment are brought into core together, and 
in this sense, a segment can be thought of as an OVERLAY, x^here 
that concept is applicable to a particular computer operating 
system. INTEGER and FIXED POINT mean the same thing, as do 
REAL and FLOATING POIlfr. 
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The term HOLLERITH* is applied to strings of alphanumeric 
characters. The term DATA VALUE, or LITERAL, will be taken to mean 
one element of the set of all integers, floating point numbers, and 
6-character** Hollerith strings. 

A data value may also be any arithmetic FORTRAN expres- 
sion, which may contain variable names. For example: 

ANAME = 6.8*4.317/C0N1 

is allowed. On the other hand, function calls such as: 

DNAME = 4.7* SIN (1.73) 

are not. The user is also cautioned to avoid mixed-mode expressions. 

A data value should not be split betareen cards unless it 
is a subroutine CALL Argument in which case a continuation FLAG in 
Gol 6 must exist as in the Standard FORTRAN continuation. 

Integers x^ill be shown in print as a sequence of digits 
preceded, optionally, by a plus or minus sign. Folating point 
numbers will appear in print as a sequence cf digits t^ith a leading, 
trailing, or imbedded decimal point, prefixed, optionally, by a plus 
or minus sign, and suffixed, optionally, by an exponent (to the base 
10) denoted as the letter E followed by an integer. Hollerith 
strings of characters will be delineated in print by asterisks. 

These are necessary because blanks are valid characters and have 
a specific binary code (i.e., they do not appear on the printed 
page, but they do appear explicitly in the computer). 


*The Hollerith code is actually a binary code for representing 
ALPHANUMERIC CHARACTERS ON PUNCHED CARDS. Other common binary 
codes for representing alphanumeric characters include BCD, 
ASCII, EBDIC, and FIELDATA. The use of Hollerith to denote 
character strings in general is purely arbitrary. 

**A 6-character string may be stored in one UNIVAC 1108 computer 
word. TRASYS implementations on other computers may provide 
more or less characters per word. In the general case, a 
Hollerith data value would contain as many characters as will 
fit in one computer word. 
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In addition to DATA VALUES, another entity, called an 
IDENTIFIFR, REFERENCE FORM, or VARIABLE, will be used (in a 
programming sense). For example, consider the following state- 
ment : 

PI = 3.14 

In this case, 3 14 is a floating point data value, and PI is an 
identifier. Note that PI is different from *PI* which is a 
Hollerith string. 

The data field of any card may be terminated by the 
character $. This terminates any further data read operations 
for that card, and allows the user to enter comment data to 
the right of the $. This may tempt the user to enter a 
comment to the right of it in an otherwise blank card. This 
results in an empty data field and a fatal error. Instead ^ 
comment cards are formatted in the classic FORTRAN manner, 
that is, with a C in card column 1. Such comment cards may be 
used in any of the data blocks. 
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INPUT DECK 


3*1 Introduction to the Input Deck 


3*1*1 Basic Concepts 

TRASYS input decks consist of too fundamental parts* Part I con- 
sists of the EDir/CONTROL blocks* These blocks do not participate at all 
in the definition of the mathematical model of the thermal radiation 
problem* This part provides basic program control and provides the user 
with his edit capability. Part 11 is referred to hereinafter as the 
TRASYS MODEL. This part is made up of the data blocks that describe the 
user’s problem in terms of geometry definition and drive logic* The 
options and source edit data blocks comprise the ED IT /CONTROL portion of 
the Input data* Examples of options data are problem title information^ 
restart tape identification, input data punch/no v xnch, iist/no list flags 
and a documentation data list/ no list flag. A one line (CC7-72) problem 
title is entered in the options data block. This title will appear on 
each page of output printed by the standard library output routines during 
execution. The Edit Data block allows the user to do a line by line edit 
on previously taped input data* The edit capability also allows the user 
to conveniently merge portions of one or more models into his master input 
model. 

The MODEL portion of the input deck consists of the following 

blocks : 

Documentation Data 
Array Data 
Quantities Data 
Surface Data 

Block Coordinate System (BCS) Data 
Form Factor Data 
Shadow Data 
Flux Data 

Correspondence Data 
Operations Data 
Subroutine Data 

In general, the largest block is the surface data. This block is 
the user’s means to describe the geometry of the surfaces that participate 
in the radiant interchange of his problem* Because of the surface data 
block’s size, a number of input options, differing in format and concept, 
are provided. This allows the user to choose the most convenient means of 
defining the different parts of his geometry; thus easing his most laborious 
task. 
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Another type o£ data that may comprise a large portion of the user's 
input may consist of information normally considered to be program output 
or interim output* A user may have^ for example^ a large portion of the 
form factors needed for his solution available from some external source* 

I Using the form factor data block;, he may enter this data and save much 
processing time* 

Another data block that alloxvrs the user to take advantage of large 
blocks of previously known data is the shadow data block* If shadow factor 
tables are known for a portion of this model, the user may enter them 
through this block and avoid computing them in a shadow factor generating 
runo 

The remaining data blocks used for general alphanumeric input are 
the correspondence data, array data and quantities data blocks. The corres- 
pondence data provides the capability for the user to redesignate node 
I numbers, and/or combine a number of nodes into single nodes. The array 
data block provides a convenient input point for any array data that the 
user may require. Array data may be integer or floating point data value 
strings, or Hollerith strings* The quantities data block performs the same 
function as the array data block except that single values are entered 
rather than strings* If the user desires, he may enter an extended written 
description of his problem in the documentation block* This will appear at 
the user^s option at the beginning of his printed output and will be stored 
I with the remainder of his input data on his RSO tape. 

The user's driver logic is entered in the operations data and sub- 
routines data blocks. The operations data block consists of a series of 
calls to user-addressable subroutines and computation segments arranged in 
a series of steps that are used for orderly handling of the output data in 
out-of-core storage* Operations block subroutine calls are primarily used 
to input and update appropriate problem parameters. The calls to the 
computation segments are what actually result in the generation of output 
data. The operations block subroutine calls are in classic FORTRAN format, 
and the user has at his disposal the FORTRAN V language for coding special- 
ized operations block logic. In the operations block, the user has access 
to all variables he identified in his array and quantities data, plus an 
extensive list of program variables located in labeled conunon. 

The subroutines data block contains FORTRAN language subroutines 
that are either user-called or called by the various computation segments* 
Routines found in the subroutines block bearing the same name as processor 
library routines will compile in place of the library routine, thus giving 
the user the capability to override any program fxmction he desires* 

3de2 Basic Structure 


The basic structure of the TRASYS input deck is sho\TO in Figure 3-1, 
This figure illustrates the two EDIT/CONTROL blocks and the 11 MODEL blocks 
in their correct input sequence. Format of the header cards that lead each 
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block is defined in Figure 3^-2. The data blocks must appea>" in the order sho^m 
in Figure 3--1. Any block may be omitted, along with its header card if it is 
not required for the problem at hand. 

The EDIT/CONTROL blocks are discussed in Section 3.2; the model data 
blocks in Section 3.3. 


















































3.2 


EDIT/COMTRQL Data Bloc ks 


3.2.1 Options Data Block 

3. 2. 1.1 Basic Concepts 

The Options data block provides the user with the following 
capabilities and operating options ; 

1) An entry point for his problem title and model name 

2) Error plot option control 

3) Source deck list/no list control 

4) Source deck punch/no punch control 

5) Go-No-Go option (No Go for edit only, no execution) 

6) Print/ no print for edit directives 

7) Relabel edit directives 

8) Print/no print of documentation data block 

9) Read/write directions for all input and output tapes 

10) Restart point in his operations data logic flow, 

3. 2. 1.2 Options Data Block Variables 

Table 3-1 lists the options data block variables together with 
their options, default values, and descriptions, 

3. 2. 1.3 Options Data Block Example 

Figure 3-3 is an example of an options data block. 

3.2. 1.4 Automatic Node Plots Option 


When surface data input rules are violated to the point where any 
surface is insufficiently defined to be usable, a fatal error flag is set 
and the run is terminated at the end of preprocessor execution. This is 
oftentimes undesirable because the primary objective of the first run on a 
newly defined model is usually to obtain plots of the problem geometry so 
that the user can visually verify his input. Time and effort can be saved 
if the surfaces that are usable to the node plotter are plotted in spite of 
the fatal errors. 
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Table 3-1 Options Data Input Detail 


Options Data Input 


DEFAULT 


CCl CC7 

OPTIONS 

VALUE 

DESCRIPTION 

TITLE 

PROBLEM TITLE IN CARD 

NONE 

PROBLEM TITLE 


COLUMNS 7-72, INCLUSIVE 



MODEL 

= ANY 1-6 CHARACTER 

THING 

PRIMARY MODEL NAME 


MODEL NAME 




= NAMEl - NAME 2 

NONE 

CHANGE MODEL NAMEl TO NAME 2 

RSREC 

POSITIVE INTEGER 

0 

DEFINES THE RSI TAPE RECORD NUMBER BEYOND 




WHICH RECOMPUTING SHOULD BEGIN IF THERE 




IS AN RSI TAPE READ ERROR 

MAXFL 

POSITIVE INTEGER 

64000 

DEFINES THE FIELD LENGTH (CORE) AVAILABLE 




IN THE COMPUTER (UNIVAC ONLY) 

LIST SOURCE 

- ACTIVE 

NONE 

LIST ACTIVE CARDS IN MODEL 


- INACTIVE 

NONE 

LIST INACTIVE CARDS IN MODEL 


- ALL 

NONE 

LIST ALL ACTIVE AND INACTIVE CARDS 


(NOT INPUT) 

NONE 

NO LIST 

PUNCH SOURCE 

- ACTIVE 

NONE 

PUNCH ACTIVE CARDS IN MODEL 


- INACTIVE 

NONE 

PUNCH INACTIVE CARDS IN MODEL 


- ALL 

NONE 

PUNCH ALL ACTIVE AND INACTIVE CARDS 


(NOT INPUT) 

NONE 

NO PUNCH 

NOGO 

(INPUT) 

NONE 

EDIT, BUT DO NOT PREPROCESS OR PROCESS 


(NOT INPUT) 

NONE 

EDIT, PREPROCESS, AND PROCESS 

NO PRINT 

- EDIT 

NONE 

DO NOT PRINT EDIT DIRECTIVES 


(NOT INPUT) 

NONE 

PRINT EDIT DIRECTIVES 

RELABEL 

(INPUT) 

NONE 

CHANGE MODIFIER LABEL TO (AA) AND DELETE 


(NOT INPUT) 

NONE 

ALL INACTIVE CARDS 

DMPDOC 

(INPUT) 

NONE 

PRINT DOCUMENTATION DATA BLOCK 


(NOT INPUT) 

NONE 

NO PRINT 

RSI 

- TXXXXl 

SEE NOTE 2 

PROGRAM WLIA. READ RSI TAPE TXXXX IF 


CONTROL CARD ASSIGNMENT IS MADE PRIOR 
TO EXECUTING PREPROCESSOR 
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Table 3~1 (continued) 


Options Data Input 
CCl CC7 


OPTIONS 


- TXXXX 


- TXXXX 


- TXXXX 


BCDOU 


- TXXXX 


- TXXXX 


EMER6 


TXXXX 


DEFAULT 

VALUE DESCRIPTION 

NONE PROGRAM WILL READ RTI TAPE TXXXX IF 

CONTROL CARD ASSIGNMENT IS MADE PRIOR 
TO EXECUTING PROCESSOR 

SEE NOTE 3 PROGRAM WILL WRITE TO RSO TAPE TXXXX IF 
CONTROL CARD ASSIGNMENT IS MADE PRIOR 
TO EXECUTING PREPROCESSOR 

NONE PROGRAM WILL WRITE TO RTO TAPE TXXXX IF 

CONTROL CARD ASSIGNMENT IS MADE PRIOR 
TO EXEGUTI^!G PROCESSOR 

BLANK PROGRAM WILL WRITE TO BCDOU TAPE TXXXX 

WHETHER OR NOT BCDOU IS LISTED IN OPTIONS 
BLOCK IF CONTROL CARD ASSIGNMENT IS MADE 
PRIOR TO EXECUTING WRITE STATEMENTS 
CREATED BY THE USERS' HEADER OPERATIONS 
DATA BLOCK. 

BLANK PROGRAM WILL READ CMERG TAPE TXXXX 

WHETHER OR NOT CMERG IS LISTED IN OPTIONS 
BLOCK IF CONTROL CARD ASSIGNMENT IS MADE 
PRIOR TO EXECUTING PREPROCESSOR AND CMERG 
EDIT DIRECTIVES ARE USED IN THE HEADER 
EDIT DATA BLOCK 

BLANK PROGRAM WILL READ EMERG TAPE TXXXX 

raETHER OR NOT EMERG IS LISTED IN OPTIONS 
BLOCK IF CONTROL CARD ASSIGNMENT IS MADE 
PRIOR TO PREPROCESSOR AND EMERG EDIT DIR- 
ECTIVES ARE USED IN THE HEADER EDIT DATA 
BLOCK 




Table 3-1 (contittued) 


Options Data Input 


DEFAULT 


CCl CG7 

OPTIONS 

VALUE 

DESCRIPTION 

USERl 

- TXXXX 

BLANK 

PROGRAM WILL WRITE TO USERl TAPE TXXXX 
WHETHER OR NOT USERl IS LISTED IN OPTIONS 
BLOCK IF CONTROL ASSIGNMENT IS MADE PRIOR 
TO EXECUTING tJRITE STATEMENTS CREATED BY 
USERS' HEADER OPERATIONS DATA BLOCK 

TRAJ 

- TXXXX 

NONE 

PROGRAM WILL READ TRAJ TAPE TXXXX IF CON- 
TROL CARD ASSIGNMENT IS MADE PRIOR TO 
EXECUTING READ STATEMENT CREATED BY USERS 
HEADER OPERATIONS DATA BLOCK 

TAPENAME* 

- TXXXX 

NONE 

PROGRAM WILL READ OR WRITE TAPE TXXXX 
DEPENDENT UPON FUTURE AND AUXILIARY 
APPLICATIONS 


* See Appendix G for additional TAPE/FILE INFORMATION 
NOTES : 

1 UTILIZING THE RSI TAPE AS AW EXAMPLE THE ALLOWABLE FORMS FOR ALL TAPES ARE: 

COL 7 

ESI NO LABEL 

RSI - TXXXX TXXXX IS ANY 6-CHARAGTER USER LABEL (eg 

TAPE NUMBER) . IT WILL BE PRINTED UNDER 
MODEL HISTORY FOR USER ONLY DOCUMENTATION 
PURPOSES 

RSI = TXXXX SAME AS ABOVE 

2 RSI MUST ALWAYS BE LISTED IN OPTIONS DATA BLOCK IF IT IS TO BE USED, EXCEPT FOR A RESTART CASE IN 
WHICH NO OPTION DATA BLOCK IS INCLUDED IN DATA DECK BECAUSE THERE WERE NO OTHER REQUIREMENTS FOR IT 
AND THE ASSIGNED TAPE HAS THE MODEL DATA ON IT. 

3 RSO MUST ALWAYS BE LISTED IN OPTIONS DATA BLOCK EXCEPT ^ffiEN AN RSI TAPE HAS' BEEN ASSUMED (SEE NOTE 2). 


Figw^e 3 -? Options Bata Block Sample 


FORTRAN CODING FORM 



X. 



The automatic node plot routines eliminate this problem. This 
capability functions as follows : when the word ERPLOT appears in the options 

data block and fatal errors result from the surface data, an operations data 
block is generated by the preprocessor. An example of such an operations 
data block is shown in Figure 3-4. This example is for a model that uses 
three block coordinate systems. The operations data block generated is 
then executed and the job terminates. Note that four automatically scaled 
plots are generated for each BCS, The views are from the x, y, and z axes, 
plus a 3-D, ‘■'so note that any operations data entered by the user is 

ignored. 

HEADER OPERATIONS DATA 
STEP 1 

CALL BUILDC(BGS1, 0) 

CALL NDAT AS (1 , 3HALL , 0) 

L NPLOI 

CALL BUILDC(BGS2 ', 0) 

L NPLOT 

CALL BUILDC(BCS3, 0) 

L NPLOT 

END OF DATA 

Fi-giope 3~4 Sosnpte Operations Data Blcdk Generated for Automatic Node Plots 

3.2.2 Edit Data Block 
3. 2.2.1 Basic Concepts 

Figure 3-5 is a block diagram of the edit portion of the pre- 
processor. Edit logic flow is shown, together with its relationship with 
the remainder of the program. The edit portion consists of the SOURCE 
EDITOR which deletes, inserts, merges, and yanks records and blocks of 
records to form a model. 

The source editor's function is to generate a complete model and 
pass it on to the data and logic preprocessors on the DATAI unit. If 
desired, the user may obtain a permanent copy of the DATAI model on an 
RS0 tape. Source editing can be done in several ways. The simplest mode 
is to read the user's cards and pass them on as a complete model on the 
DATAI unit. Alternatively, the user supplied CMERG tape can be passed 
along directly if the GMERG tape is nothing more than the user's cards 
previously transferred to tape. The CMERG unit also provides an interface 
between any user supplied input processing routine (s) and the program. In 
the general edit case, the source-edit cards are used to generate an ex- 
ecutable model from input data found in card form and on the CMERG, RSI, 
or EMERG units. 
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Figure 3-S Edit Segment Logic Flout 
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The product of the TEASYS editor is a single TRASYS nusdel. This 
is either a model selected from an RSI tape, or a model in the card input 
stream. Edits can be in the form of record deletions and record insertions. 
Records for insertions can be obtained from these sources: (1) the card 

input unit (edit data block) ; (2) the card merge unit » CMERG; and (3) the 
edit merge unit - EtIERG. 

The CMERG unit can be single or multifile tape, disk, or drum. 

The data contained on the CMERG unit must be in BCD mode, TRASYS card image 
form. This type of data is usually generated by: (1) card-to~tape by an 

off-line computer; (2) TRASYS processor output; or (3) TRASYS input data 
conversion programs. 

The EMERG unit can be a single or multifile tape, disk, or drum. 
The data contained on the EMERG unit must be in the RS0 tape format. 

The EMERG file is another RS0 output tape from a previous run. 

Any record or group of records contained in any file or model on 
the CMERG or EMERG units can be merged into the primary model. Cards to 
be merged into the primary model can be in random order on the CMERG and 
©lERG units, Note that inserting data from the cards in the edit data block 
is possible only when the primary model comes from an RSI unit. 

Besides deleting, inserting, and merging cards into the model, 
the source editor has the capability of yanking modifications. Each time 
a model is edited, the inserted and deleted cards are tagged with a modi- 
fier label and deleted cards are maintained on an inactive status. A 
’’yank" provides a simple means of returning a model to the condition it 
was before a given modification. For instance, yanking modification "A" 
will insert all cards deleted by "A" and delete all cards inserted by "A.*’ 
More than one label can be yanked in one run. Cards deleted by a yank are 
not maintained on inactive status. 

3. 2. 2. 2 Edit Data Block 


After an RSO tape has been generated, the user will have a source 
listing with edit numbers and edit labels. This tape may then become an 
RSI or an EMERG tape that can be edited according to the source listing 
using edit directives in the edit data block. Table 3-II presents details 
of the edit data block directives together with format information. 

Figure 3-6 (a) is an example of an edit data block. 

3. 2. 2, 3 Edit Operations 

Edit operations are illustrated by the following examples, see 
Fig, 3-6 (b) and 3-6 (c) ; 
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L) Model on cards, edits directly from cards and from EMER6 
and CMERG tapes, 

2) Model on an RSI tape, edits from cards, EMER6 and CMERG 
tapes. 
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Table 3 -II Edit Data Block Input Details 


§ 


< 


EDIT DATA IMPDT 

(SEE NOTES AT END OF TABLE) 

*1, N1 
OR 

*INSERT, N1 

*D, N1 
OR 

*DELETEj N1 


*D, Nl, 

N2 


OR 



DELETE, 

Nl, 

N2 

*C, Fl 



OR 



*CMERG, 

Fl 


*C, Fl, 

Nl, 

N2 

OR 



*CMERG, 

Fl, 

Nl, N2 

*C, Fl, 

Nl, 

ALL 


OR 

*CMERG, FI, Nl, ALL 

*E, NAME 
OR 

*EMERG, NAME 
*EMERG, NAME Nl, N2 

OR 

*PUNCH 


DESCRIPTION 

THE CARDS FOLLOWING THIS CARD WILL BE INSERTED AFTER EDIT NUMBER -Nl- 

DELETE PRIMARY MODEL CARD WITH EDIT NUMBER -Nl- 

DELETE PRIMARY MODEL CARDS WITH EDIT NUMBERS -Nl- THROUGH -N2- 

MERGE THE ENTIRE CARD FILE -Fl- FROM UNIT -CMERG- 

MERGE LINES Nl THROUGH N2 FROM GMERG PILE Fl 

MERGE ALL LINES FROM Nl TO END OF CMERG PILE Fl 

MERGE THE ENTIRE EDIT MODEL, -NAME- FROM UNIT -EMERG- 

MERGE THE ENTIRE EDIT MODEL, -NAME- FROM LINE Nl THROUGH LINE N2 
PUNCH ACTIVE CARDS PROM THE UPDATED MODEL (SEE NOTE 3) 


!*P, INACTIVE 
iOR 

|*PUNCH, INACTIVE 

*P, ALL 
OR 

PUNCH, ALL 

*L 

OR 

JT^T 


PUNCH INACTIVE CARDS FROM THE UPDATED MODEL (SEE NOTE 3) 

PUNCH ALL ACTIVE AND INACTIVE CARDS FROM THE UPDATED MODEL 
(SEE NOTE 3) 

LIST ACTIVE CARDS FROM THE UPDATED MODEL 


Table 3- II (conol) 


EDIT DATA INPUT 
(SEE NOTES AT 
END OF TABLE) 

*L, INACTIVE 
OR 

*LIST, INACTIVE 

*L, ALL 
OR 

*LIST, ALL 
*S 

OR 

^SEQUENCE 

*Y, AB 
OR 

*YANK, AB 

*Y, AB, AD 
OR 

*YANK, AB, AD 
NOTES : 


DESCRIPTION 


LIST INACTIVE CARDS FROM THE UPDATED MODEL 


LIST ALL ACTIVE AND INACTIVE CARDS FROM THE UPDATED MODEL 


NUMERICALLY SEQUENCE PUNCHED CARDS. THIS CARD MAY APPEAR ANYliIHERE IN 
THE EDIT DATA BLOCK 

delete all Cards from primary model that IiTERE inserted by edit DIREC- 
TIVE -AB- (SEE NOTE 4) 

DELETE ALL CARDS FROM PRIMARY MODEL THAT OTRE INSERTED BY SOURCE EDIT 
directives -AB- THROUGH -AD- (SEE NOTE 4) 


IjJ 

(-• 

VJ1 


1. AN ASTERISK (*) IN CARD COLUMN 1 DESIGNATES AN EDIT CONTROL CARD. 

2. EDIT CONTROL CARDS ARE FREE FIELD FORMATED IN CARD COLUMNS 2 THROUGH 72 WITH BLANK COLUMNS 
AND COLUMNS 73 THROUGH 80 IGNORED. 

3. THIS CARD MAY BE USED IN PLACE OF THE -PUNCH SOURCE- OPTION IN THE OPTIONS DATA BLOCK. IF 
BOTH CARDS ARE INPUT, THIS CARD OVERRIDES THE OPTIONS DATA INPUT. THIS CARD MAY APPEAR ANY- 
liTHERE IN THE EDIT DATA BLOCK. 

4. ONLY ONE YANK DIRECTIVE CAN APPEAR IN THE EDIT DATA BLOCK, AND THAT CARD MUST IMMEDIATELY 
FOLLOW THE -HEADER FDIT DATA- CARD. 















HEADER OPTIONS DATA 

TITLE EDITOR CHECK OUT -EXAMPLE 1 

MODEL “ DATAl | DATAl = MODEL NAME THAT WILL APPEAR ON RSO TAPE 
EMERG - TXXXX 
CMERG - TXXXX 
RSO - TXXXX 
HEADER SURFACE DATA 

(SURFACE DATA CARDS) 

C INSERT CARDS 199 THRU 998 FROM EMERGE MODEL SURFDl INTO SURFACE 

C DATA BLOCK 

*MERG , SURFDl , 19 9,998 

(ADDITIONAL SURFACE DATA CARDS) 

-HEADER FORM FACTOR DATA 
C INSERT FILE 4 FROM CMERG TAPE 

*CMERG,4 

HEADER FIUX DATA 

(FLUX DATA CARDS) 

HEADER OPERATIONS DATA 

C INSERT PART OF FILE 2 FROM CMERG TAPE 

*0,2,1,39 

END OF DATA 

(b) Edit Operatons Example - Model on Cca>ds 


HEADER OPTIONS DATA 

TITLE EDITOR CHECK OUT EXAMPLE 2 

MODEL = DOGKl - D0CK2 $ DOCKl = RSI MODEL N.AME 
C D0CK2 = RSO MODEL NAME 


EMERG - TXXXX 
CMERG - TXXXX 
RSI - TXXXX 
RSO - TXXXX 
HEADER EDIT DATA 


*D,2,6 

* 1,11 


(CARDS TO BE INSERTED IN LIEU OF C^JIDS 2 THRU 6) 


(CARDS TO BE INSERTED AFTER CARD 11) 

*1,340 $CARD FOLLOWING INSERTS CARD 312 THRU 450 FROM MODEL DOCKA 

C ON EMERG AFTER CARD 340 

*E,D0CKA,312,450 

*C,3,2,111 $ INSERTS CARDS 2 THRU 111 FRCM CMERG FILE 3 


(g) Edit Operations Example ~ Model on RSI Tape 


Figure 3-6 (oonal) 
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3.3 


Model Data Blocks 


3.3.1 Documentation Data 


Experience has shown that thermal mathmatical models may have an extended 
useful life, especially if tape storage with convenient editing capability is 
available. The usual environment of sketchy and rarely updated documentation 
results in a waste of resources as these long-lived models are passed from anal- 
yst to analyst through project personnel changes. 

As an aid in alleviating this problem, TRASYS users may document their 
efforts in an easily edited and easily accessed form in the documentation data 
block. 


The documentation data block has the following format: 

CCl CC7 CC7 

2 

HEADEE. DOCUMENTATION DATA 

Documentation Data Card 1 
Documentation Data Card 2 


Documentation Data Card N 

Documentation data cards have a data field from CC7 through 72 inclusive and 
have no restriction on their alphanumeric content. There is no practical limit 
on the number of documentation cards allowed. 

The control field of documentation data cards is used for carriage con- 
trol. The integer N appearing anywhere in CCl through 6 of a documentation data 
card results in N lines being skipped before printout c" that card. If less 
than N lines are available on a page, the card will bej, i a new page. If a new 
page is desired, the letter P is placed in CCl. A docu..,antation data printout 
is available at the user^s option. The flag DMPDOC appearing in the options 
block results in a printout of the documentation data prior to any preprocessor 
or processor operations. 

3.3.2 Quantities and Array Data Blocks 

3.3. 2.1 Basic Concepts 

The quantities and array data blocks have the primary function of provid- 
ing the user with a convenient input point for any single variable and array data 
he plans to use during his execution. User constants are defined in the quanti- 
ties data block and arrays in the array data block.,.. A user variable or array 
may take any name not appearing in the program reserve name list or program con- 
trol constant list (see Appendix A). Real, Integer, or Hollerith data may be 
entered. Mode agreement is required for real and integer data names. Hollerith 
strings are limited to 6 characters in the quantities data block. 
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The pre^processor provides default values for all program control con- 
stants, so no control constant input is required in the quantities data. Fur- 
ther, all control constants can be redefined in the operations block. Thus, de 
fining control constants at the quantities data block merely has the effect of 
redefining the default values. In general, this practice is not recommended 
because it is easy for the user to forget that he has a non-standard default 
value in his quantities data block when he is defining control constants in the 
operations data block. 

3*3. 2-2 Rules for Input 


All quantities and array data are entered in the data field (Columns 7 
through 72) of the cards following the appropriate header card. Specific rules 
for input are: 

1) The general quantity data formats ^ are; 

NAME = DV, (integer) 

ANAME ^ DV, (real) 

NAME (or ANAME) = DV where DV is a 1 to six character 
string* (Left justified, blank filled) 

2) The general array data formats are: 

NAME - DVl, DV2 ™ “ DVN (integer) 

ANAME = DVl, DV2 DVN (real) 

NAME . (or ANAME) - aM A HOLLERITH ARRAY* (Hollerith) 

3) Array data values may be operated as follows: 

NAME = DVl, REFEAT, DV2, N, DVN+2 (Repeats DV2 N times, 
continues with DVN-f2) 

Real array repeat format is identical. 

4) Variable names must consist of 3 to 6 alphanumeric characters, 
with an alphabetic character heading. 

5) Any number of quantities or array data values and names may be 
entered in Card Columns 7 through 72 inclusive. Input may 
continue to following cards with no data in the control field, 
provided the fields between commas are complete on each card. 

6) Commas are assumed at the end of each card. Commas may be 
entered at the beginning or end of cards at the user’s option - 
The read routine igtores these. 

7) Cards may end but not begin with equal signs. 

8) Empty fields (consecutive commas) are illegal. 

9) Mode agreement between names and data values must be maintained. 
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3.3.2.^ Quantities and Array Data Accessinn 


Quantities and array data are placed in common and are thus accessible 
from any user or program-called execution routines. The following are the rules 
for accessing this data: 

1) Quantities data are accessed by name only. 

For example, with 

ANAM = DV, 

in the quantities block, the statement 
VAL = ANAM 

in any execution routine results in DV being stored under the 
name VAL. Mode must be preserved according to the rulea of 
FORTRAN . 

2) Array Data is accessed as illustrated by the following 
examples. Each example presumes that the array: 

ANAM = DVl, DV2 DVN 

appears in the array data block. 

A. SUBROUTINE CALLS 
The statement: 

C AT T etTTJV ( h pr*1 AT>r*0 AM AV ADrj/i ^ 

in any execution routine will pass the entire ANAM array 
to subroutine SUBX. 

B. INTEGER COUNT 

The. integer count for any array is accessed through the 
following function call: 

IC = lACT (ANAM) 

C. INDIVIDUAL DATA VALUES 

Individual data values are accessed under the usual rules 
of FORTRAN. The statement: 

VAL = ANAM (6) 

results in DV6 being stored under the name VAL. 

3) The array data block serves as the only means of reserving 
space for the operations data block. The following example 
illustrates this with: 

ANAMA = DVl, DV2, DVN, 

XARRAY = ElEPEAT, 0., N 
in the array data block, the statements: 

DO 1 I = 1, IG 
1 XARRAY (I) = ANAMA (I) 

in the operations data block will locate the ANAMA array in 
the first IC words of XARRAY. 
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3,3*3 Surface Data 


3. 3-3*1 Basic Coucepts 


In its present state of development, TRASYS allows the user’s geometric 
configuration to be made up of the following geometric shapes, or portions there- 
of : 


(1) Rectangles 

(2) Discs 

(3) Polygons 

(4) Right Circular Cylinders 

(5) Cones 

(6) Spheres 

(7) Paraboloids 

(8) Rectangular Parallelepipeds with 5 or 6 faces 

The surface areas of these shapes are what TRASYS is concerned with. The 
volume within a sphere, for instance, has no bearing on the thermal radiation prob 
lem* Either or both sides of any surface can be defined as "active*” Also, any 
surface can be defined as a "shadower” or "non shadower" depending on whether or 
not it is desired that it be considered in shadowing (blockage) calculations* 



The active side concept is illustrated in the sketch. If form factors 
were computed in this geometry, and would exist because the active sides 

involved are in view of each other. Surface B, however, is ignored by surface A. 

Again referring to the sketch, if surface B is defined as a shadower in 
form factor computations, it will affect the calculation of reducing it 

accordingly* If not entered as a shadower, it would be totally "invisible" from 
surface A, Active side definition has no bearing on a surface’s effect as a 
shadower. One further condition must exist for surface B to effect the value of 
F 3 that is surfaces A and C must be flagged as "can be shaded" surfaces in 

form factor calculationfa 
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A similar logic is used in computations of direct irradiation. Surfaces 
defined as shadowers may affect the direct irradiation computed depending on 
direction to the incident flux source. 

Since all surfaces in nature can shade and be shaded, it may seem ques- 
tionable to leave the shadowing definition up to the user. The reason for this 
is that significant amounts of computation time can be saved by flagging out 

■ surfaces that cannot enter into shadowing. It is also advantageous from the 
standpoint of computation time to minimize the number of surfaces to define a 
given configuration and nodal breakdown. 

Any surface may be subdivided into nodal surfaces of equal or unequal 
size. In general, the nodal surfaces chosen should correspond with the isother- 
mal nodes that appear in the user's thermal analyzer model. For various reasons, 
this may not be possible, so a convenient means for combining nodes is provided. 

3. 3. 3. 2 Coordinate System Definition 


The surface data is associated with four different, right--handed carte- 
sian coordinate systems; 

Surface coordinate system 

Intermediate coordinate system 

Block coordinate system 

Central coordinate system 

Their definitions are as follows : 

Central Coordinate System (CCS) - This is the single coordinate system to 
which all vehicle surfaces must be related* This coordinate system is also used 
to orient the spacecraft relative to the sun, planet, or a star# This coordinate 
system is analogous to the body coordinate system used in trajectory tapes* 

Slock Coordinate System (BCS) - Any "block” of surfaces that will be 
moved relative to other surfaces during execution must be related to a named 
block coordinate system. Similarly, if it is desired to activate and/or deacti- 
vate a block of surfaces during the course of the problem, these surfaces are 
related to a separate block coordinate system. 

Intermediate Coordinate System (ICS) - An intermediate coordinate system 
is used when it is convenient to relate a group of surfaces to a coordinate sys- 
tem distinct from any BCS or the CCS. 

Surface Coordinate System (SCS) - Each surface Is related to its own SCS 
in a manner that: provides a convenient means of input. The surface must then be 
related to the CCS by defining the rotations and translations necessary to make 
the SCS and CCS coinc? 
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3. 3. 3. 3 Coordinate System Hierarchy 


Each surface and hence nodal surface defined in the surface data block 
may undergo three transformations , as follows, before processing begins: 

SCS ICS BCS CCS 


where, for example the symbology SCS ICS indicates a transform from SCS-defined 
3-space to ICS defined 3-space, These transforms must be performed because all 
processing is done assuming surface definition in CCS-defined 3-space. 


Depending on the complexity of each particular surface definition problem, 
the user may or may not concern himself with all the transforms. In the simplest 
case, the user defines a surface in terms of x, y, z coordinates in CCS 3-space. 
The program automatically generates an SCS for each surface and also generates 
the transforms necessary to describe the surface in CCS 3-space. In the most 
complex case, the user defines his surface in SCS 3-space, defines six rotation 
and translation variables for the SCS ICS transform, defines six rotation and 
translation variables for the ICS BCS transform, and finally six more variables 
for the BCS ^ CCS transform. For cases of intermediate complexity, for instance 
when an ICS is not needed, the ICS "“>• BCS transform variables will default to 
zero and the user’s SCS ICS transform variables will, in reality define an 
SCS BCS transform. Further, if neither an ICS or BCS is required, the SCS 
ICS and ICS ^ BCS transforms will default to zero, and the user’s SCS ICS 
transform definition will, in reality, define an SCS ^ CCS transform. 


■i 


3. 3. 3. 4 Surface Data Input Philosophy 


The user is provided with distinct methods of defining his surface. 

He may define a surface relative to an SCS, then relate it to the remainder of 
the surfaces by defining the SCS-CCS translations and rotations; or he may lo- 
cate the surface directly in relation to the CCS by entering the x, y, z coordi- 
nates of up to 15 points on his surface (point method) . His choice of these 
methods depends on the particular surface being considered and its relationship 
to the remainder of the vehicle. In general, it is easy to define a surface 
relative to an SCS. This requires five numbers. It may or may not be convenient 
to determine the translation and rotation data (up to 6 numbers) needed for the 
SCS ^ ICS, SCS BCS, or SCS CCS relationship. When the computation of these 
rotation and translation parameters is laborious, the point method is usally a 
better choice. Except for polygons, this requires up to 5 point definitions per 
surface (15 numbers) , but generally these points are on the surface involved and 
may be easily scaled from an engineering drawing. 

3*3. 3. 5 Surface Data Variables 

The variable names devoted to surface data definition are defined in 
Table 3-III. Also tabulated are their default values, and the allowable range 
o£ each variable, where applicable. Figure 3-7 illustrates the relationship of 
the dimension surface data variables to each geometric figure. Both the surface 
coordinate system methods and point methods of input are shoira. A careful study 
of Table 3-III and Figure 3-7 will pay dividends to the new.TRASYS user. 
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Table S~II£ Surface Data Input Detail 

RANGE OR 

VARIABLE NAME OPTIONS DEFAULT VALUE 

GENERAL DATA; 

SURFN 1-99999 NONE 

NNX 1-999 1 

UNNX 0.<UMNX_<(XJtAX-XMIN) NONE 

NNY 1-999 1 

UNNY 0.< UIW<(YMAX-YMIN) NONE 

NNZ 1-999 1 

UNNZ 0.<UNNZ:^ (ZMAX-ZMIN) NONE 

NNAX 1-999 1 

UNNAX 0.< UNNAX!< (AXMAX-AXMIN) NONE 

MR 1-999 1 

UiMR 0. TJNNR (RMAX-RMIN) NONE 


TYPE RECT , TRAP 

DISK, CYL 
CONE, SPHER 
PARAB, BOX 5 

BOX6, POLY NONE 

IDUPSF 1-99999 NONE 


IMAGSF 


1-99999 


NONE 


DESCRIPTION 




Tdble 3-IIX ( aont) 


RANGE OR 

VARIABLE NAME OBTIONS 

GENERAL DATA; 

ACTIVE TOP, BOTTOM 

BOTH (PLANAR 
SURFACES) 



BCSN 

COM 

SHADE 


BSHADE 


IN, OUT, BOTH 
(SURFACES OF 
REVOLUTION) 

1-6 CHARACTER 


N/A 

FF, DI, BOTH, 
NO, ONLY 


FF, DI, BOTH 
NO 
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Table 3-III (oont) 


VARIABLE NAME 

RANGE OR 
OPTIONS 

DEFAULT VALUE 

DESCRIPTION 

DIMENSIONS 

DATA: 




AXMIN 


-270. < AXMIN <450. 

NONE 

MLN. X-ANGIE SURFACES OF REVOLUTION 

AXHAX 


-270. < A>IMAX < 450. 

NONE 

MAX. X- ANGLE 

ZMIN 


N/A 

NONE 

MIN, DIMENSION-'?. DIRSCIION 

ZMAX 


S/A 

NONE 

MAX, DIMENSION- c, D:SSCT10N 

RMIN 


N7A 

NONE 

MINIMUM RADIUS - DISK SECTION 

Ri'lAX 


K/A 

NONE 

MAXIMUM RADIUS - DISK SECTION 

R 


N/A 

NONE 

PADIAL DIMENSION 

Z 


N/A 

NONE 

Z DIMENSION 

PI, P2 
PROPERTIES 

ETC. 

DATA: 

PI - P15 

NONE 

aAPvTESlAN POINT INPUT (GENERAL FORM: 
?K = XN, ^N, ZK) 

ALPHA 


0.< ALPHA<1.0 

NONE 

ABSORPTIVITY-SOLAR 

EMISS 


0.< EMrSS<1.0 

NONE 

EMISSIVITY-IR 

IRANI 


-1.0<TRANI< 1.0 

0.0 

TRANSMISSIVITY-IR 

TRANS 


-1.0<TRANS< 1.0 

0.0 

TRANSMISSIVITY-SOLAR 

SPRI 


0. < SPRI < 1.0 

0.0 

SPECULAR REFLECTIVITY - IR 

SPRS 


0, < SPRS< 1.0 

0.0 

SPECULAR REFLECTIVITY - S0LAR 



fable 3-III (oont) 



DBSCRT.mON 


I 

TRANSLATION DISTANCE FEOJ' ORIGIN OF CCS, 

DCS OR ICS TO ORIGIN 0? SCS, f-EASURlCD ALONG 
CCS, BCS OR ICS X-AXIS. 

SAME AS XX, E/CF.n LIJTAG f-AXIS 

SAME AS TX, UXa’PT ALONG Z-AXIS 

ROTATION /\I3GLE TO ROTATE CCS, BCS OR ICS 
INTO SCS} ROTATES ABOUT CCS, BCS CR ICS X-AXIS, 

Y TOWARD Z POSITIVE. 

SAME AS ROTX, EXCEPT ROTATES ABOUT V, Z 
TOWARD X POSITIVE. 

SAME AS ROTX, EXa:PT ROTATES ABOUT Z, X 
TOt-JARD Y POSlim. 


I 

INTERMEDIATE COORDINATE SYSlIiM NUMBER 

TRANSLATION DISTANCE FROM ORIGIN OF CCS OR 
BCS TO ORIGIN OF ICS, MEASURED ALONG CCS OR 
BCS X-AXIS . 

SAJE AS TX, EXCEPT ALONG Y-AXIS. 

SANE AS TX, EXCEPT ALONG Z-AXIS. 
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VARIABLE NAME 

ICS DEFINITION 
(I CARD) DATA: 


RANGE OR 
OPTIONS 


DEFAULT NAME 


ROTX 

-360. 

< ROTX 

360. 

0.0 

ROTY 

-360. 

ROTY 

360. 

0.0 

ROTZ 

-360. 

ROTZ < 

360. 

0.0 


DESCRIPTION 


ROTATION ANGLE TO ROTATE CCS OR BCS INTO 
ICS; ROTATES ABOUT CCS OR BCS X-AXIS, Y 
TOWARD Z POSITIVE 

SAME AS ROTX, EXCEPT ROTATES ABOUT Y, Z 
TOWARD X IS POSITIVE. 

SAME AS ROTX, EXCEPT ROTATES ABOUT Z, X 
TOWARD Y POSITIVE. 


R-CARD DATA: 
REFNO 

D-CARD DATA: 
DV 

N-CARD DATA; 
INC 


1-99999 


FLOATING POINT 


INTEGER 


NONE 


1.0 


0.0 


*If the surface has a component of specular reflectance 
or set to "NO," the flag is teset to "FF." If the flag 
ular surfaces must be shadowers in the FF segment.) 


NUMBER OF REFLECTING PLANE SURFACE. 


LENGTH UNIT MULTIPLIER 


SURFACE ..UMBER CHANGE VALUE (SURFN = 
SURFN + INC). 

and the can-shade flag is either unspecified 
is set to "DI" it is reset to "BOTH." (Spec- 









TRAPEZOID 


Z 


SCS 

MBTuOD 



Z 



POINTS are numbered CCW 
AROUND FIGURE AS VIEWED 
FROM THE "TOP" SIDE OF 
THE SURFACE. P1-P4 MUST 
BE SHORTER THAN AND 
PARALLEL TO P2-P3. 

FOR A TRIANGLE, PI 
AND P4 ARE ENTERED AS 
DUPLICATE POINTS 


*"Surface" coordinate system as generated by 
Figure 3-7. (cont) program. 
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METHOD 



15., 25., 45., (STANDARD) 


(ALTERNATE) 


AXMIN = 25. 
AXMAX = 45 . y 


EXAMPLE: (PIE-SECTION) 

PI = XI, Yl, ZL 
P2 = X2, Y2, Z2 
P3 » X3, Y3, Z3 
P4 » X4, Y4, 24 
NOTE: 

PI = DISC' center, P2, P3, & P4 
ENTERED CCW, AS SEEN FROM 
"TOP" SIDE 


tips/ / 




>P4— *.P3 
Y* 


*'*Sur£aca" coordinate system as 
generated fay program. 

POINT 

METtrao 


CCS, BCS, OR ICS ORIGIN. 
EXAMPLE: ANNULAR SECTION) 

XI, Yl, Zl 


METHOD X PI - XI, Yi, zi 

X P2 = X2, y2, Z2 

X P3 - X3, Y3, Z3 

X = X4, Y4, Z4 

X P5-X5,Y5-5i5 

DTE : PI, P3, P4, AND P5 NUMBERED COT AS VIE^^ED FROM THE "TOP" SIDE OF THE SURFACE. 
LINE P2-P1 MUST BE PERPENDICULAR TO LINE P4-P1 AND ALL OR PART OF THE ACTIVE 
SURFACE MOST LIE BETl^EN P2 AND P4. 
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cylinder 


nn 


/3|J 


SCS ORIGIN 


EXAMPLES: 


DIMENSIONS 

= 11.5 

R 

= 11.5 

ZMIN 

= 10. 

ZMAX 

= 22. 

AXMIN 

= 25. 

AXMAX 

= 45. 


ALTERNATE 


^ CCS, BGS, OR ICS ORIGIN 

^”Sur£ace^’ coordinate system as generated 
by program. 


NOTE: SURFACE GENERATED FRO^r P2 TO P3 CCW ABOUT AXIS 

AS VIEWED FROM PL END. 

Figure 3-7. (cont) 




z 


POINT 

METHOD 



NOTE: SURFACE GENERATED FROM P2 TO P3, CCW ABOUT AKIS AS Vm'JED FROM PI TOWARD 

Figure 3-7. (aont) 



METHOD 


POINT 

METHOD 


NOTES: 



o PI defines the "North Pole" of the sphere « 

o P2 and P3 define the equatorial plane of the sphere and the extremities 
of the active portion of the sphere in the angular direction about the 
polar axis. Surface is generated from P2 to P3 GOT as viewed from 
PI toxfard P4. 

a P4 defines the center of the sphere. 

o P5 and P6 must lie on the longitudinal line defined by PI and P3. P5 
and P6 define the extremities of the active portion of the sphere as 
measured along the polar axis. 

o All six points must be input for any partial definition of a spherical 
surface. 

oA complete sphere is generated from 3 points: PI - North Pole, P2 - 

Center, P3 - Point on Equator where node generation begins. 

* "Surface" coordinate system as generated by program. 
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circular paraboloid 


z 



z 


FOUR POINT INPUT 


POINT 

METHOD 


^"Surface" coordinate 
system as generated by 
program. 



NOTE: PI AND P4 DEFINE AXIS OF REVOLUTION. 
SURFACE IS GENERATED FROM P2 TO P3 
CCW AS VIEWED FROM PI TOWARD P4 


Figure 3-7, (aont) 
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FIVE AND SIX SIDED 
BOXES 


NOTE: ACTIVE = BOTH 

NOT ALLOWED 


scs 

METHOD 


NOTE: Face in X-Y Plane Deleted 

for 5 -sided box 



POINT 

METHOD 


Figure 3-7. 
3-38 



NOTE: PI, P2 AND P3 MUST ALL LIE ON SAME PACE OF 

FIGURE, WITH P4 DIAGONALLY OPPOSITE Pl. FACE 
CONTAINING Pl, P2 and P3 DELETED FOR 5-SIDED BOX. 


{ cont) 




N-SIDED POLYGON 


Z 


POINT 
METHOD 1 



POINT 
METHOD 2 


2 
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Figure 3-7. (aonal) 


The variables found in the surface data block can be grouped as follows: 

- general data 

- dimensional data 

- properties data 

- position data 

- ICS definition data 

A summary of the function of each data group follows: 

General data - this ”catch all” data group is used to define: 

1) node identification numbers 

2) surface type (disk, sphere, etc.) 

3) active side information 

4) shadowing information, and 

5) nodal breakdown and dinension information. 

Dimensional data - This data group is used to define the desired boundaries of 

the geometric surfaces and portions of same. 

Properties data - This data group is used to define the optical properties of 

the surfaces. Properties allowed are diffuse solar absorpti** 
vity and transmissivity, diffuse infrared emissivity and 
transmissivity, specular solar reflectivity, and specular 
infrared reflectivity. 

Position data - These data are the six rotation and translation variables nec- 
essary to locate an SCS relative to an ICS, BCS or CCS. 

3. 3. 3, 6 Nodal Surface Identification 


When a surface is subdivided into nodal surfaces, the user has the 
option of numbering the nodal surface consecutively, beginning with the identi- 
fication number he used for the surface, or arbitrarily, using a node number 
array. In either case, he must understand the scheme used by TRASYS to identify 
nodal surfaces. Figure 3-8 illustrates this process with examples of surfaces 
with single and dual active sides. 

The user will no doubt quickly discover from Figures 3-7/3-S that the node 
numbering schemes are related to the SCS-referenced method but have no rela- 
tion to the CCS -referenced point method. The number scheme tunctions vjith 
point input, however, because the first step in processing a point-defined sur- 
face is to provide it with an internally generated SCS. Once this is done, the 
node numbering scheme can proceed. It is necessary, therefore, for the user 
to understand hov7 the internally generated surface coordinate system relates 
I to his point input. This is illustrated for each surface type in Figure 3-7. 
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YMIN, ZMBI, RMIN 




Figure 3~8 Hade deneration Order- 


SINGLE ACTIVE 
SIDE. (VIEW FROM 
OUTSIDE OR TOP) 


BOTH SIDES ACTIVE. 

FIRST, THIRD, FIFTH, 

ETC. NODES ARE ON INSIDE 
OR BOTTOM. SECOND, 
FOURTH, SIXTH, ETC. NODES 
ARE ON OUTSIDE OR TOP. 
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X 


ACTIVE = INSIDE 
OR OUTSIDE 



X 


ACTIVE = BOTH: FIRST, 
THIRD, FIFTH, ETC, NODES 
INSIDE. SECOND, FOURTH, 
SIXTH, ETC. NODES OUTSIDE, 


Z 



ACTIVE = TOP 
OR BOTTOM 


Figuvs (oonal) 


Z 



ACTIVE = BOTH: FIRST, 

THIRD, FIFTH, ETC., NUMBERED 
NODES ON TOP (+Z) SIDE, 
SECOND, FOURTH, SIXTH, ETC., 
NIHIBERED NODES ON BOTTOM, 
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An understanding of Figures 3-7 and 3-8 should enable Che user to properly 
number his nodal surfaces when using point input to define the surface. 

The user should realize that the generalized node breakdo\m schemes in- 
volving NNX, NNY, USNX, UNNY, etc., do not pertain to the BOX and POLYGON sur- 
face types where a fixed node generation scheme exists. If a user desires to 
subdivide the faces of a box, the faces must be input as rectangles. Subdivi- 
ding a polygon requires entering the individual triangles desired. The user may 
wonder at the capricious-looking node breakdo^m that results from his polygon 
input. This occurs because shadowing solutions exist for triangles, but not 
polygons. After processing, the polygon's triangles are combined for output 
as one node, but the user should be aware of this subdivision process in order to 
avoid duplication of node numbers. 

3. 3. 3. 7 Dimensional Units 


Nodal areas are carried in data storage for direct irradiation and radi- 
ation conductor calculations. For this reason, surface data length inputs must 
be in feet, the standard TRASYS length unit. Convenient means of units control 
are provided by D-cards (Re'*' 3. 3. 3. 9.1). 


In regard to the surface data block, the user needs to remember that all 
the linear dimensions he uses in defining the surfaces of his model must be in 
feet (after D-card manipulations) and that all angular measurements must be in 
degrees (and decimal fractions of degrees) of arc. 


3. 3. 3. 8 Properties Data 

In its present state of development, TRASYS is restricted to the assump- 
tions that all surfaces are "grey", all surfaces emit diffusely, and all surfaces 
reflect with diffuse and specular components of reflectance. 


“IR-^ 


Pir'*' 


‘^IR '^IR 


1.0 


a +p -fp^ + T = 1,0 
s s s s 


where : 

a = diffuse absorptiviny 
p = diffuse reflectivity component 
p® = specular reflectivity component 
T = transmissivity 
subscripts: 

IR = infrared waveband 


s = solar waveband 
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It might be observed that since semitransparent materials and specular 
surfaces are allowed j the form factors are not, in general, surface property in- 
dependent but a function of the transmissivities and specular components of 
reflectivity. 

Material transmissivity plays a part in form factor calculations where 
blockage by a semitransparent surface is involved. The assumption made for these 
calculations is that any element to element configuration factor with an inter- 
vening semitransparent surface is multiplied by a shadow factor equal to the 
value of the blocking surface's transmissivity. This is a reasonable approach 
for thin intervening bodies. 

Since only surfaces, rather than bodies, are used in TRASYS calculations, 
only one face of the semitransparent body will "'count” as a shadower- If two 
surfaces are input for one body, the square root of the transmissivity can be 
used as the shadow factor to avoid having the shadowed configuration factors 
erroneously multiplied by the square of the transmissivity. In this case, the 
user enters a negative transmissivity value- This is detecL.::d by the program 
and the absolute value of the square root of the transmissivity used as the 
shadow factor. Note: if two sides of a semitransparent body are generated using 

ACTIVE = BOTH, negative transmissivities are not required because only one shad- 
owing surface is generated. 


Specular reflectivity comes into play in the form factor calculations 
as a result of the imaging techniques used and the definition of an "image fac- 
tor" as described in Appendix I. 

It might be noted that the presence of semitransparent surfaces wnere 

r T and/or the presence of specular surfaces where pf ^ P| results in 
IR s 

separate form factor matrices for the infrared and the solar wavebands. Both of 
these matrices are carried in program data storage and are printed in the stan- 
dard output. 

3 . 3 , 3 , 9 Surface Data Format 


3. 3. 3. 9.1 Control Field Formats 


Eight different types of cards containing control field information are 
allowed in the surface data block. The card types are: 

1. New Surface Card (S Card) 

2. BCS Identifier Card (B Card) 

3. ICS Definition Card (I Card) 

4. Constant Definition Card (K Card) 

5. Linear Dimension Units Card (D Card) 

6. Node identification number increment card (N Card) 

7. Reference plane for imaging surfaces and/or BCSs (R Card) 

(Ref. para. 3.3.3.11). 

8. Comment Cards 

S Cards are used to signal the completion of the input for a surface 
and the beginning of a new surface. Their general format is: 

CCl CC7 CG7 

3 

S Any Surface Data Card ID Information 


Preceding page blank 
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Any data encountered beginning with an S card and ending with the card preceding 
the next S or R card j.s presumed to apply to a single surface and is defined as a 
surface description. If insufficient data to define a surface is found following 
an S card, either default will be supplied or an error message results. If 
redundant data is entered an error message results. 

B cards are used to identify surfaces with the desired block coordinate 
system. Their general format is ! 

CCl CC7 CC7 

3 

BCS Block Coordinate System Name Card ID 

All surface descriptions encountered between two B cards wi?.l be keyed 
to the BCS name found in the leading B card. Any surfaces not preceded by a B 
card will be automatically keyed to a block coordinate system named ALLBLK. 

BCS ALLBLK defaults to zero rotation and translation parameter values, That is, 
it coincides mth the CCS. It may be redefined by the User with appropriate 
data in the Header BCS Data Block. 

See Sections 3.3.3.10.3 and 3.3.3.10.4 for Alternate B Card formats for 
duplicating and imaging Blocks of Surface Data. 

I Cards are used for definition of intermediate coordinate systems. 

Their general format is; 

CCl CC7 CC7 

3 

I Intermediate Coordinate System Data Card ID 

Continuation cards are allowed for ICS definition. In other words, all 
information encountered bettireen an I card and another card containing informa- 
tion in CCl (except for comment cards) is presumed to pertain to a single ICS. 

NOTE ; A general surface data deck structure rule is that all I cards must pre- 
cede all S cards . 

K cards ar,e used for definition of user constants referred to in surface 
data. Their general format is: 

CCl CC7 CC7 

3 

K Constants Data Card ID 

Continuation cards are allowed for constants definition. All cards be- 
tween a K card and the next card with data in CCl (excepting comment cards) can 
be thought of as a data subblock that defines surface data constants. 

NOTE: A general surface data deck structure rule is that all K cards must pre- 

cede all S cards . 
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It should be noted that a basic difference exists between K-card con- 
stants and constants entered in the quantities data block* Unlike quantities 
data constants, K-card constants are used for surface data manipulation only, 
and are not available during processor execution. 

D-cards are used for linear dimension units control. Since TRASYS com- 
putations cannot be made independent of dimensional units, it was necessary to 
choose a standard units system for compatibility between the various computation 
segments and subroutines* The TRASYS standard length unit is feet, which is 
oftentimes inconvenient when the user is working from engineering drawings in 
inches, or perhaps a metric unit* This problem has been eliminated by allowing 
for dimension change (D-cards) in the surface data input. These cards function 
as follows: when a D-card is encountered in the surface data, all linear dimen- 
sions in the surface (S-card) data following will be multiplied by the floating 
point data value on the D-card. This holds true until another D-card is encount- 
ered or until the end of surface data block* All intermediate coordinate systems 
referenced by surfaces being modified by a D-card are also modified by the D-card. 
This means that the following rule must be observed carefully: the linear dimen- 

sions on any ICS referred to in a surface description must agree with the linear 
dimensions of the pertinent surface data, prior to modification by a D-card. 

This D-Card format is: 

CCl CC7 

D DV (floating point) 

A surface data block using D-cards is shown in Figure 3-10. 

N-cards are used for node number redefinition. The thermal analysis of 
large vehicles frequently involves combining several TRASYS models into one* 

The component models v7ill generally have been generated independently, perhaps 
by different contractors, and node/surface number duplication in the various 
surface data blocks will be common. The laborious task of renumbering nodes to 
eliminate duplication is alleviated considerably by use of the N-card option. 

When an N-card is encountered in the surface data, all node and surface numbers 
in the surface (S-card) data following will be changed accordingly to: 

SURFN = SURFN + NINC 


where : 


NINC is an integer value found on the N-card, 

This holds true until another N-card is encountered or until the end of the sur- 
face data block* Changing SURFN for a surface means that all node numbers assoc 
iated with that surface are changed, whether automatically generated or input as 
an integer array. 


HEADER OPTIONS DATA 
TITLE CLASSES FOLLY 
MODEL=CLAS 

HEADER SURFACE DATA 

D 1./12. $ FOLLOOTNG LINEAR DIMENSIONS ARE MULTIPLIED BY 1./12. 

S SURFN=201, 

TYPE=CYL, 

R=1 .0 , ZMIN= 3.0, ZMAX=15 . 0 ,AXiIlN=0 . 0 ,AXMAX -=360.0, NNZ=1 , NNAX=1 , 
ACTIVE=OUT, ALPHA=0.3,EMISS=0.9, 

TY=5.0, 

S SURFN-301 

TYPE=SPHER 

R=3 . 0 , ZMIN=0 . 0 , ZMAX=3 . 0 , AXMIN=0 .0 , AXMAX=180 . 0 , NNZ=1 , NNAX=1 , 
TZ=20 . , 

ACTIVE=OUT, ALPHA=0 . 2 ,EMISS=0 . 9 , 

S SURFN=401, 

TYPE=CONE 

R=1 . 0 , Z^^N=0 . 0 , ZMAX=2 . 0 , AXMIN=0 . 0 , AXMAX=360 . 0 , NNZ=1 , NNAX=1 , 
TZ=17.0,ROTY=180., 

TY=5.0, 

ACTIVE=OUT, ALPHAK) . 9 , EMISS=0 . 9 , 

S SURFN=501 

TYPE=CONE, 

R=3 . 0 , ZMIN=1 . 0 , ZMAX«3 . 0 , AXMIN==0 . 0 ,AXIyIAX=180 . 0 , NNZ=1 , NNAX=1 , 
TZ=2.0, 

ACTIVE=0UT ,ALPHA=0 .9 ,EMISS=0 -9 , 

D 1. $ TERMINATES EFFECT OF PREVIOUS D-CARD 

N 10 $ REMAINING NODE NUMBERS ARE INCREASED BY 10 

S SURFN=701 

TYPE=CONE 

R=1 . 0 , ZMIN=1 , 0 , ZMAX=2 . 0 , AXMIN=0 . 0 , AXMAX=360 . 0 , NNZ=1 , NNAX=1 , 
TZ=1.0,TY=5.0, 

ACTIVE=OUT , ALPHA=0 . 9 , EMISS=0 . 9 , 

S SURFACE=901 

TYPE=TRAP 

P1=0 .707*4 .0,0 .707*5 .0,4 .0, 

P2=0. 707*3 .0,0. 70 7*3. 0,5.0, 

P3=0. 707*3. 0,0. 707*3. 0,8.0, 

P4=0. 707*5 .0,0.707*5.0,6.0, 

ACTIVE=BOTH, ALPHA=0 .2 ,EMISS=0 . 9 , 

S SURFN =905,TYPE=P0LY 

Pl=-. 707*5.,. 707*5., 4. 

?2=-. 707*3., .707*3., 5. 

P3=0 .707*3.0,0.707*3.0,8.0, 

P4=0. 707*5., .707*5.6. 

ACTIVE=BOTH , PROP= , 2 , . 9 
HEADER OPERATIONS DATA 
BUILD CLAS,ALLBLK 
L NPLOT 

END OF DATA 


Figure 3-10 D-Card and N-Card Operations Example 
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The following N-card restriction must be observed: the variable NINC 

may take on any positive or negative integer value such that 

1 ^ SURFN + NINC ^ 99999 

is true for all values of SURFN involved. 

The N-card format is: 

CCl CC7 to CC 72 

N NINC 

A surface data block using N-cards is shown in Figure 3-10. 

Comment cards, v;ith the following format: 


Comment Information 


CC7 

3 

Card ID 


may appear any\>rhere In the surface data block. Another means of entering comment 
information is to delimit a data field (CC7-72) with a $ and enter comment infor- 
raatxon to the right of it, as follows: 


Surface Data $ Comment Data 


CC7 

3 

Card ID 


This may tempt the user to place a 2 in the data field of an otherr^rise blank 
card and enter a comment* This is illegal. It results in a blank data field 
and an error message. 

3. 3. 3. 9. 2 Single Variable Input Format 

Any single variable recogni 2 .ed as surface data may be entered in a card 
data field according tc the general format: 


NAJ^IEl = DV, NAME2 = DV, 

NAHEl and NAME2 may be any variable name defined by the surface data variables 
list (Table 3-1), plus in the case of K cards, the names may be as defined by 
the user, limited only by the mode and word length limit of 6 characters* 
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Single variable input is the only means available for defining the fol- 
lowing list of surface data variables; 


TYPE 


NNX 

SURFN 

ACTIVE 1 

j- NOTE 1 

NNY 

IREFSF 

SHADE 

NNAX 

IDHPSF 

BSHADE ' 


ICSN (in a surface 

IMAGSF 

SPRI *1 
SPRS J 

NOTE 2 

description) 

REFNO 


Notes: 1, If ACTIVE = BOTH and SHADE NO, the SHADE Flag applies only to the 

"bottom" or "inner" surface. SMDE = NO automatically for the "top" 
or "outer" surface. 

2. Values of either or both of these variables greater than zero re- 
quires; 

NNX = NNY = 1 (one node allowed per specular surface) 

TYPE = RECT, DISC, TRAP, B0X5, B 0 X 6 , or POLY (specular surfaces must 
be planar) 

SHADE = FF or BOTH (specular surfaces must be shadowers in FF seg- 
ment. This flag is reset by the program to "FF" if unspecified 
or specified as "NO" and is reset to "BOTH" if specified as "DI.") 


All other surface data variables may be defined in convenient ' short form" array 
formats per subsections 3. 3. 3. 9. 3 through 3. 3. 3. 9. 9. 

3 . 3 . 3 . 9 . 3 Intermediate Coordinate System Data Format 


ICS data may be entered in array format as follows; 


CCl 

I 


CC7 

ICSN, TX, TY, TZ, ROTX, ROIY, ROTZ 


CC7 

2 


This array defines the translations and rotations necessary to transform a BCS 

I (or CCS) into the ICS. The new user should refer to para. 3.3.3.9.11 until defining 
this transformation becomes automatic. The three rotations, ROTX, ROTY, and ROTZ are 
p 0 i;formed in that order. If it is desired to alter the order of the rotations, the 
following hybrid format is used; 

CCl CC7 CC7 

2 


I ICSN, TX, TY, TZ, ROTY = DV, 

ROTZ = DV, ROTX = DV 


for rotation first about the BCS Y-axis, second about the BCS Z-axis and third 
about the BCS X-axis. 


It should be noted that each ICSN value appears at least twice in the 
surface data block. Once in the I card defining the ICS, and again in each sur- 
face description where an SCS/ICS transform is desired. 
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3. 3, 3. 9. 4 Surface Identification Format 


A single node surface is identified as follows, in single variable input 

format: 


CCl 

S 


CC7 

SURFN = DV (Integer) 


CC7 

2 


If a surface is to be subdivided into several nodes, and they are not to be 
numbered consecutively, the node number array may be entered according to the 
formats : 


CGI 

S 


CC7 

SURFN = DVl, DV2, — -DVN 


CC7 

2 


or for consecutively numbered nodes 

CCl CC7 

S SURFN = DVl 

which generates node numbers DVl, DVl + 1, 

DVl + 2, DVl + (N-1) 

for an N-node surface. 

3.3, 3.9.5 Properties Data Format 

The diffuse properties data may be defined using the following format: 


CC7 

PROP = ALPHA, EMISS, TRANS, TRANI 


CC7 

2 


If values for TRANI and TRANS are not encountered, they will default to zero. 

Specular properties data must be input in the single variable format 
(see 3. 3. 3. 9. 2). 


3 . 3 . 3 . 9 . 6 Dimensions Data Format 

The dimensions data may be defined using the following format: 


CC7 

DIMEN = R, ZMIN, ZMAX, AXMIN, AXMAX 


CC7 

2 
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3 ,3. 3. 9. 7 Point Data Format 


The X, y, 2 coordinates of point data input are defined using the follow- 
ing format: 

CC7 

PN == VX, ZN 

A values up to 15 are recognized, depending on the surface type (Ref* Figure 3-7) . 

This is the only format allowed for point data* Single variable defini- 
tions are not allowed. 

3. 3. 3. 9.8 Position Data Format 


CC7 

2 


The position data may be defined using the following format: 


CC7 

POSIT = TX, TY, TZ, ROTX, ROTY , ROTZ 


CC7 

2 


This array defines the translations and rotations necessary to transform an ICS, 

BCS, or CCS into the SCS. The new user should refer to para. 3.3.3.9.11 until 
defining this transformation becomes automatic. The three rotations ROTX, ROTY, and 
ROTZ are performed in that order. If it is desired to alter the order of the rota- 
tions, the following format is used: 


CC7 

POSIT = TX, TY, TZ, ROTY = DV, ROTZ ^ DV, ROTX = DV 


CC7 

2 


3. 3, 3. 9. 9 Comment Data Format 


A Hollerith string of up to thirty characters may be entered with each 
surface description according to the following format: 

CC7 

COM = * Any Alphameric Data - 

( These comments will be passed to the processor and printed \7±th the sur- 
face description output that results from the BUILDC and ADD calls in the operations da 

3*3.3.9.10 Node Boundary Dimensions 

When it is desired to generate an unequal node breakdo^^n on a surface, 
it is necessary to define the node boundaries using one or more of the UNNX, 

UNNY, UNNZ, UNNAX and UNNR arrays. Figure 3-11 illustrates this scheme for NNZ= 

2, NNAX=3. 


CC7 

2 
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nirTrn^-TiT riTriinT ^'^irrmi-r hiii 


1 



This example required the following unequal boundary arrays; 

UNNAX = DVIAX, DV2AX 
UNXZ = DVIZ 

These arrays are entered in the surface data block according to the following 
format : 

CC7 CC7 

2 

UNNAX = DVLAX, DV2AX 

UNNZ = DVIZ 

The general format is; 

CC7 CC7 

2 

UKNX = DVl, DV2, . . . DVN 

vjhere: N = NNX -1. 
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.M... 



i 


I ^ 

3.3.3*9*11 Coordinate System Definition Process i I 

^ I ^ 

The definition of any coordinate system relative to another requires ! 

the user to input the variables TX, TY, TZ, ROTX, ROXY, and ROTZ. Assuming that I : 

it is desired to defii?e an SCS in the CCS, BCS, or ICS, the required variables i ^ 

can be evaluated by the following procedure; ; 

1. Mentally locate the SCS origin in CCS, BCS or ICS 3-space, : j 

2, The X, Y and Z coordinates, in CCS, BCS or ICS 3-space, of the SCS ; | 

origin are TX, TY and TZ respectively. 4 

3* Mentally locate the CCS, BCS or ICS origin at the SCS origin, with ] 

the CCS, BCS or ICS axes parallel to their actual directions. \ 

\ 

i 

4- Define up to three rotation angles ROTX, ROTY and ROTZ which can \ 

be performed in any order that will finish with the CCS, BCS, or j 

ICS located per 3., coincident with the SCS. 

Enter the TX, TY, TZ, ROTX, ROTY and ROTZ values on the B-card 
in the HEADER BCS DATA block (to define the BCS relative to the 
CCS), and in the HEADER SURFACE DATA block on the I-card (to 
define the ICS relative to a BCS or the CCS), or in position 

data (to define the SCS relative to an ICS, a BCS, or the CCS), j 

maintaining the order in which the rotations were performed. 

3.3,3.10 PUP and IMAGE Options 1 

Two options are available that enable the user to conveniently duplicate 
surfaces already defined in the surface data blocks or otherwise redefine them j 

and add them to configuration or configurations in the surface data. Using the | 

surface DUP option, single surfaces, consisting of one or more nodes can be 

created by referencing previously input surfaces. Using the BCS DUP option, 
entire blocks of surfaces previously defined under a particular BCS name can be 
created by simply referencing a previously input BCS name* 

Similarly, images of single surfaces and blocks of surfaces can be created 
using the surface IMAGE option and the BCS IMAGE option. These options greatly 
reduce the user's effort if he is defining a bi-laterally symmetric configuration. 

The remainder of this subsection presents examples of the use of these 
Options, together with restrictions on their use. 
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j 


3.3.3.10.1 Surface PUP Option 


The following rules and restrictions apply when using the surface DUP 

option: 

a) Surfaces to be duplicated must appear in the surface data block before 
the surfaces that are to be created by duping. 

b) Any of all of the surface description variables of the surface being 
duplicated can be changed. 

c) If the surface to be duplicated vjas input by the point method and any 
changes are to be made in the points, all points must be input for the 
surface being created. 

d) Generated surfaces such as boxes and polygons will be duped in their 
entirety. That is, the individual nodes generated by '’box" or "polygon’ 
cannot be duped. 

e) Surfaces created by the DUP option may later be imaged. 

f) The surface to be duplicated is specified by setting the variable IDUPSF 
equal to the surface number. 

g) Any correspondence data that applied to the nodes created by the Surface 
DUP option must be supplied by the user in the Correspondence data block. 

A sample input deck using the surface DUP option can be found in 

Figure 3-12. 

3.3.3,10.2 Surface IMAGE Option 

The IMAGE option allox<rs the user to create surfaces by imaging prev- 
iously input surfaces in some specified reference plane. The follm'rf.ng restric- 
tions and rules apply when using the IMAGE option: 

a) Surfaces to be imaged must appear in the surface data block before the 
surfaces that are to be created by imaging. 

b) Reference planes (imaging planes) in which surfaces are to be imaged 
are special surfaces designated by R-cards, Each of these planes is 
assigned a unique identification number and is defined by specifying, 

in any order, any three non-colinear points lying on its surface. These 
points are defined vrith respect to the CCS. 

c) Generated surfaces such as boxes and polygons will be imaged in their 
entirety. That is, individual nodes generated by "box" or "polygon" 
cannot be Imaged. 

d) Surfaces created by imaging cannot be duped. 

e) For purposes of imaging, the image surface, the reflecting plane, and 
the imaged surface are treated internally to the program as if they v;ere 
defined with respect to the central coordinate system. 
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HEADER OPTIONS DATA 

TITLE DUP OPTION SAMPLE PROBLEM 

HEADER SURFACE DATA 


S SURFN 

=10 

TYPE 

-SPHERE 

R 

=10. 

ZMIN 

=-9.99 

ZMAX 

= 9.99 

AXMEN 

=0. 

AXMAX 

=360. 

TX 

=0. 

TY 

=10. 

TZ 

=20. 

ACTIVE 

=OUT 

PROP 

=0.2, 0.9 

COM 

=* SURFACE TO BE DUPED * 

S SURFN 

=20 

IDUPSF 

=10 

R 

=20. 

ZMIN 

=-19.99 

ZMAX 

= 19.99 


=-20. 

PROP 

=0.5, 0.8 

COM 

=* DUPLICATE OF SURFACE 10 

HEADER OPERATIONS DATA 


BUILD FIG2.ALLBLK 


L NPLOT 


END OF DATA 



Figure 3-12 Sample Problem Using the Surface DUP Option 


The surface Co be imaged is specified by setting the variable IMGSF 
equal to the imaged surface number* The reference plane in which IMAGSF 
is to be imaged is specified by setting lElEFSF equal to the reference 
plane number. 

g'i When a surface is imaged, the nodes are also imaged resulting in a 

reversed order of node numberings The active side of the surface also 
follows image rules. Figure 3-13 illustrates these phenomena* 

h) Any correspondence data that applies to the nodes created by the surface 

IMAGE option must be supplied by the user in the correspondence data block, 

A sample problem illustrating the surface IMAGE option can be found in 

Figure 3-14. 


3*3,3*10.3 BCS PUP Option 


The following rules and restrictions apply when using the BCS DU? 

option, 

a) All the surfaces comprising the BCS to be duplicated must appear prior 
to the BCS that exercises the BCS DUP option. 

b) All dimensional properties, surface properties and shadowing charcteristics 
of each surface in the BCS generated by the BCS DUP option remain exactly 
the same as those in the BCS that was "DUPED”. The new surfaces can be 
moved as a group by the parameters defining the new BCS in the BCS data 
block. The remaining properties may be altered in the operations data 
block by use of the "MOD" series of subroutine calls. (Reference Section 
4,3.8*)' 

c) Blocks of surfaces created by the BCS DUP optinn may be again DUPED by 
another BCS DUP operation* 

d) Blacks of surfaces created by the BCS I^IAGE option (see 3,3,3,10,4) cannot 
be DUPED, 

e) Surfaces defined in the usual manner that follow the BCS card that performs 
BCS duping will simply appear together with the surfaces created under the 
same BCS name. 

f) BCSs may be DUPed x^ithin the same BCS. 

g) User correspondence data for the surfaces generated under the BCS DUP option 
need not be defined as such in the correspondence data block* Correspondence 
data applying to nodes within a BCS to be "duped" must be entered with one 
more variable per card than it would otherwise* See Section 3,3.8. 3 for a 
description of this input requirement. Auto correspondence data for poly- 
gons created by BCS DUP is automatically generated. 

CCl CC7 

BCS BCS MM, DUPBCS NINC == NNN 


REV. 1 
3-57 



z 



NOTE; NODE X+10 IS THE IMAGE OF NODE X 

Figure 3-13 Imaging of Nodes and Active Side (Image Option Sample Problem) 
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IIE^VDER OPTIONS DATA 

TITLE IMAGE OPTION SAMPLE PROBLEM 


HEADER 

SURFACE 

DATA 


S 

SURFN 

= 

1 


TYPE 

= 

RECT 


ACTIVE 

= 

TOP 


NNX 

=1 

3 


NNY 

= 

2 


PROP 

= 

0.3, 0.9 


PI 

= 

3.0, 4.0, 1.0 


P2 


1.0, 5.0, 1.0 


P3 

= 

1.0, 6.0, 4.0 


COM 

=: 

* SURFACE TO BE IMAGED- 

S 

SURFN 

= 

11 


IMAGSF 

- 

1 


IREFSF 

= 

50 


ICSN 

= 

100 


COM 

= 

-'IMAGE OF SURFACE 1* 

K 

REFNO 


50 


PI 


0.0, 1.0, 0,0 


P2 

= 

0.0, 1.0, 1.0 


P3 

= 

1.0, 1.0, 1.0 


COM 


* REFERENCE PLANE* 


HEADER OPERATIONS DATA 
BUILD FIGl.ALLBLK 
L NPLOT 

END OF DATA 


Figure 3-14 Sample Problem Using the Surface Image Option 
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where: 


BCSNAM = Name of block coordinate system under which DUP^generaued 
surfaces are placed. ^'BUPed*^ surfaces may become part of 
a previously define! BCS system (INAME) by making BCSNAM 
identical to INAME, 

INAME == Name of block coordinate system under which surfaces to be 
*^DUPED" are defined. 

DUPBCS = Required control word. 

NINC = Node number increment applied to all nodes under BCS INAME 
to generate the node numbers under BCS BCSNAM. (Integer 
Number) 

A sample input deck using the BCS DUP option can be found in Figure 3-14A. 

3.3.3.10.4 BCS IMAGE Option 

The following rules and restrictions apply when using the BCS IMGE 

opv ! jn. 

a) All the surfaces comprising the BCS to be imaged must appear prior to the 
BCS that exercised the BCS image option. 

b) All surface properties and shadowing characteristics of each surface in 
the BCS generated by BCS IMAGE option remains the same as those of the 
surfaces that were imaged. All dimensional properties appear as mirror 
images of the original surfaces ^ as seen in the ^^reflecting** plane. The 
surface properties and shadowing characteristics may be altered using 

the MOD subroutines in the operations data block. (Reference Section 4.3.8) 

c) Blocks of surfaces created by the BCS IMAGE option may be again IMAGED 
by anocher BCS IMAGE operation, but they may not be DUPED, 

d) Surfaces defined in the usual manner that follow the BCS card that per- 
forms BCS imaging will simply appear together with the surfaces created 
under the same BCS name. 

e) Auto and User correspondence applicable to the original surface will auto- 
matically be applied to any generated images. The User should refer to 
Section 3,3.8, Correspondence Data, to obtain special formats for relabeling 
or negating this automatic feature. 

BCS cards that exercise the BCS IMAGE option have the following format 

and variable definitions: 

CCl CC7 

BCS BCSNAM, IMGBCS = INAME, NINC^NNN, IREFSF=NNN 

BCSNAME, INAME and NINC are defined the same as on BCS cards that exercise duping 

and similarly BCSNAME may equal INAME. IREFSF Is the number of the reflecting 

plane surface. (Integer 1-99999) IMGBCS is a required control word. 
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HEADER OPTIONS DATA 
TITLE GOBLES FIRST FOLLY 
MODEL=FIGl 
HEADER SURFACE DATA 
BCS RIGHT 
S SURFN = 201, 

TYPE=CYL, 

R=1 . 0 , ZMIN=3 . 0 , ZMAX=15 . 0 , AXMIN=0 . 0 , AXMAX=360 . 0 , NNZ=1, NNAX-1 , 
ACTIVE=OUT , ALPHA=0 . 3 , EMISS=0 . 9 , 

TY=5 . 0 

S SURFN=301 

TYPE=SPHER 

R=3 . 0 , AMIN=0 . 0 , ZMAX=3 . 0 , AXMIN=0 . 0 , AXMAX=180 . 0 ,NNZ=1 , NNAX=1 , 
TZ=20. , 

ACTI VE=OUT , ALPHA=0 . 2 , EMISS=0 . 9 , 

S SURFN=401, 

TYPE=CONE 

R=1 . 0 , AMIN=0 . 0 , ZMAX=2 . 0 , AXMIN=0 . 0 , AXMAX=360 . 0 ,NNZ=1 , NNAX=1 , 
TZ=17.0,ROTY=180. , 

TY=5.0, 

ACTIVE=OUT , ALPHA=0 . 9 , EMESS=0 . 9 , 

S SURFN=501 

TYPE=CONE, 

R=3 . 0 , AMIN=1 . 0 ,ZMAX=3 . 0 , AXMIN=0 , 0 , AXMAX=180 . 0 ,NNZ=1 , NNAX=1 , 
TZ=:2.0, 

ACTIVE=OUT , ALPHA=0 . 9 , EMISS=0 , 9 , 

BCS LEFT , DUPBCS=RIGPT , NING=500 

C ABOVE CARD GENERATES SURFACES 701,801,901 AND 1001. 

C BY DUPLICATION OF SURFACES UNDER BCS RIGHT. 

C 

HEADER BCS DATA 

BCS RIGHT, 0. ,0. ,0. ,0. ,0. ,0. 

BCS LEFT ,0. ,0. ,0. ,0. ,0. ,0. 

HEADER OPERATIONS DATA 

CALL CHGBLK(LEFT,0. ,0. ,0., 0,0, 0,0. ,0.,180.) 

BUILD FIGl, RIGHT, LEFT 

L NPLOT 

END OF DATA 


Figure 3-14A BCS Duping Operations Example 




HEADER OPTIONS DATA 

TITLE GOBLES SECOND FOLLY ! 

MODEL FIGl i 

HEADER SURFACE DATA ! 

BCS RIGHT i 

S SURFN=201, ! 

TYPE=CYL, 

R-1.0,ZMIN=3.0,ZMAX=15.0,AXMIN=0.9, AXMAX=360.0,NNZ=1,NNAX=X, j 

ACTIVE=0UT,ALPHA=0.3,EMISS=0.9, | 

TY=5.0 j 

S SURFN=301 1 

TYPE=SPHER 

R=3 . 0 , Z^EN=0 . 0 , ZMAX=3 . 0 , AXMIN=0 , 0 , AXMAX= 180 . 0 , NNZ=1 , NNAX=1 , 

T2=20. , 

ACTIVE -OUT ,ALPHA=0 . 2 ,EMISS=0 . 9 , 

S SURFN=401, 

TYPE=CONE ] 

R=1 . 0 ,ZMIN=0 . 0 , ZMAX=2 . 0 , AXMIN=0 . 0 , AXMAX=360 . 0 , NNZ=1 , NNAX=1 , i 

TX=17.0,ROTY=180. , j 

TY=5.0, ; 

ACTIVE=OUT , ALPHA=0 . 9 , EMIS S=0 . 9 , 

S SURFN=501 ; 

TYPE=CONS 

R=3 . 0 , ZMIN= X . 0 , ZMAX=3 . 0 , AXMIN=0 . 0 , AXMAX=180 . 0 , NNZ=X , NNAX=1 , 

TZ=2.0, 

ACTIVE=OUT , ALPHA=0 . 9 , EMIS S =0 . 9 , ! 

BCS LEFT,IMGBCS=RIGHT,NINC=500,IREFSF=999 

C ABOVE CARD GENERATES SURFACES 701, 801,901, AND 1001. 

C THEY ARE IMGES OF 201,301,401 AND 501 AS SEEN 

C IN REFLECTING SURFACE 999. I 

C 

R REFN0=999 

PI =0.,0.,0. 

P2 =1.0,0. ,0. 

P3 =0.,0.,1.0 

HEADER BCS DATA | 

BCS RIGHT ,0.,0.,0.,0.,0.,0. j 

BCS LEFT, 0.,0.,0.,0.,0.,0. | 

HEADER OPERATIONS DATA 

BUILD FIGl, RIGHT, LEFT i 

L NPLOT ] 

END OF DATA j 

1 

i 

1 


Figure 3-14B BCS Imaging Operations Example. 
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i: 


A sample input ^ieck using the BCS I^IAGE option can be found in Figure 
3-14S, Careful examination of Figures 3-14A and 3~14 b will show that they | 

define the same configuration in a different manner, 

3.3.3^11 Shadower-Onlv Surfaces | 

In manv radiat ion-Jominated thermal analysis problems, there are sur- 
faces which are so remote from the region of interest that thev do not nctiveiv 
enter into the radiation network. These surfaces, however, block incoming 
radiation and the view to space for the nodes of interest. The use of shadower- 
only surfaces permits the user to account for this blockage without increasing 
Che complexity of his problem in the region of interest. 

The following rules apply in the use of shadower-only surfaces: 

a) Shadower-only surfaces provide blockage in both the FF and the 
DI segments. They appear no where in the program output of the 
User's problems, however. 


b) Form factors from node i to both sides of shaciower-only surfaces 

are summed and added to F. . to conserve energy 

(infers T , . = T.) 

shadowers i 


Flag IFFSHO can be set equal to 2HN0 in the Quantities Data Block j 

or in the Operations Data Block to bypass the calculation of j 

form factors to shadower-only surfaces, IFFSELO defaults to 3HYES. j 

c) Because these surfaces are not active in the problem, neither | 

the active side nor the surface optical properties need be input. | 

} 

d) Shadower-only surfaces are specified by setting the shade flag; j 

SHADE ^ ONLY, | 

e) Shadower-only surfaces must be added after all active surfaces, i 

It is recommended that shadower-only surfaces be input in j 

separate BCS(s) and that these BCS(s) be added last in the 

BUILD-ADD sequence- (Reference Appendix D, Pg D-2, D-5.) ' 

f) Shadower-only surfaces may appear or not appear in node plots, I ! 

at the User's option. This is controlled by the ISHO argument I 

in subroutine NDATA (reference Appendix D) . I I 
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3.3.4 


15CS Data 


Fach bloct )ordinate system named in the surface data block must 
be defined in the data block* An exception is the default BCS **ALLBLK** 

which does not appea- Ln the BCS data block* BCS "ALLBLK” is assumed always 
to be coincident with the CCS. Block coordinate systems are defined according 
to the following formats; 


CCL 

B 


CC7 


BCSNAM, TX, TY, TZ , ROTX, ROTY, ROTZ 


CG7 

2 


If the rotations are not to be performed in the standard x, y> order, the 
hybrid format: 

CCl CC7 CC7 

2 

B BCSNAM, XX, TY, TZ, ROTZ == DV, 

ROTX = DV, ROTY, = DV 


may be used. Rotations in this example are performed first about Z, then X, 
then Y. Aritbrnetic expressions can be used for data values (reference 

Section 2.3)* 


The variable names entered in the BCS data block are defined In Tabic 
3"IV* Note that these definitions are almost identical to the ICS and position 
data of the surface data block, even to variable names* This creates no ambi- 
guity, because the position and ICS variables are used in the preprocessor only, 
and unlike the BCS variables, are not addressable from the processor routines. 

In common with position and ICS data, these translation and rotation variables 
appear to translate the CCS into the BCS. The new user should refer to para. 
3.3.3.9.11 until defining this transformation becomes automatic. 

3.3.5 Form Factor Data 


The form factor data block provides an entry point for form factor 
data that is known to the user in advance, and provides for user direction of 
some form factor computing procedures, through the RECOMP and ONLY options. 

From the standpoint of TRASYS operations, information in the form 
factor data block is used by the preprocessor to define two form factor 
request matrices. J^a form factor data block is not encountered in the input 
stream, the form factor request matrixes default everywhere to -1.0. The two 
request matrixes provide for both the solar and infrared wavebands. They are 
identical unless semi-transparent surfaces with different infrared and solar 
transmi=*sivt t ies are present* 


Preceding page blank 
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Table S-IV BCS Data Input Detail 


VARIABLE NAME 

RANGE OR 
OPTIONS 


DEFAULT VALUE 

DESCRIPTION 

BGSN 

ANY 6 
CHARACTER 
NAME 


NONE 

BLOCK COORDINATE SYSTEM NAME 

0!X 

N/A 


0.0 

TRANSLATION DISTANCE FROM ORIGIN OF CCS 
TO ORIGIN OF BCS, JEASUEED ALONG CCS 
X-AXIS . 

TY 

N/A 


0.0 

SAME AS TX, EXCEPT ALONG Y-AXIS 

TZ 

N/A 


0.0 

SAME AS TX, EXCEPT ALONG Z-AXIS 

ROTX 

-360. < ROTX£ 

360, 

0.0 

ROTATION ANGLE TO ROTATE CCS INTO BCS 3 
ROTATES ABOUT CCS X-AXIS, Y TOWARD Z 
POSITIVE. 

ROIY 

-360, < ROTY ^ 

360. 

0.0 

SAME AS ROTX, EXCEPT ROTATES ABOUT Y, Z 
TOWARD X IS POSITIVE. 

ROTZ 

-36C. < ROTZ _< 

360. 

0.0 

SAME AS ROTX, EXCEPT ROTATES ABOUT Z, X 
TOWARD Y IS POSITIVE. 


A form factor request matrix is a triangular matrix of the same form as 
a form factor macrix* It is used for detail direction of form factor computations , 
and finally for storage of the form factors* This is done as follov/s : prior to 

computing each form factor, the corresponding value in the request matrix is 
examined; if it is zsero or greater than zero, it is presumed to be a valid form 
factor and is left in the matrix unchanged; if less than zero, the form factor is 
computed and stored in place of the negative number* 

Prior to any form factor calculations, the following operations are per- 
formed on the request matrix, in the order Indicated , 

1. Matrix set everyi^rhere to -1.0. 

2. Matrix overwritten with all form factors on RSI/RTI tapes* 

3. Values of 0*0 set per ZERO cards* 

4* Values of 0*0 set per ONLY cards. 

5* Values of -1*0 set per RECOMP cards (overrides values on restart tape). 

6* Set individual form factor values per form factor data cards. 

Operations 3 through 6 happen only if a form factor data block is pres- 
ent, Note that these operations enable the user to: a) arbitrarily set all form 

factors from a given node to zero if it is kno\m to be **out of sight" of the re- 
maining nodes; b) Compute only the form factors from selected nodes, setting all 
other form factors to zero; c) Recompute form factors knovm to be in error on the 
restart tape(s); and d) Set individual form factors to any value desired* 

The above discussion applies to a single problem geometry. If more than 
one geometry exists in a given job, multiple sets of request matrices are involved* 
The form factor data block provides for definition of as many request matrices as 
required. 

3 . 3 . 5 . 1 Variable De f initions 


Form factor data block designators are defined in Table 3-V. 


Table 3-V Form Factor Designators Definition 


COL. 1 DESIGNATOR 
VARIABLE NAME 

RANGE 

DEFAULT 

VALUE 

DESCRIPTION 

FIG 

Hollerith, 6 
Characters, Max, 

None 

Configuration Name* 

NODEA 

1-99999 (Integer 
Array) 

None 

Node Identification No. 
Array. 

INITL 

Any floating point 
number 

Ref Section 
3*3*5*2-3 

Used to initialize the 
'p'F Request Matrix 

IR, SOL, BOTH 
or BLANK 

N/A 

Both 

Indicates data for IR, Solar 
or Both Request Matrices. 

ONLY 

N/A 

None 

Indicates "ONLY" option* 

RECOMP 

N/A 

None 

Indicates "RECOMP" option* 

ZERO 

N/A 

None 

Indicates "ZERO" option. 
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3*3. 5, 2 


Form Factor Data Formats 


1) FIG cards are entered according to the following format: 


CCl 


CC7 


FIG GNAM 


CC7 

2 


The FIG card may precede or follow the NODEA Array 

2) The NODEA array is entered according to the following format 

CCl CC7 CC7 

2 


NODEA NNl, NN2, • * . NNH, END 


for an N-Node matrix. The NODEA array may precede or follow 
the FIG card. The node numbers must be entered in the exact 
order that results from the surface data block and the order 
of BUILDC and ADD calls in the operations data block. For 
this reason, the chances of a user-written node numbe?r matrix 
being valid for a large problem are remote. When a node 
array is needed, use Subroutine FFNDP (Ref. Section 3. 3. 5. 6). 

NOTE: The node array is required only, when individual form 

factors are to be defined in the form factor data block, or 
when equivalent form factors (Section 3.3. 5*4) appear. If 
all records in the FORM FACTOR DATA BLOCK utilize one of the 
condensed formats pertaining to an entire row and column, 
then a Node Array is not required. 

NOTE: That R and Z may be substituted for REGOMP and ZERO 

respectively in the formats given below. 


3) CCl CC7 

INITL DV 


This card is usually not required. It may be used when FFs are 
not being obtained from RSI or ONLY or RECOMP options are not 
being used. If not set by the other options or the user it 
will default to -1,0. 

4) Single form factors are entered according to the following 
format: 


CCl 

WBAND 


CC7 CC7 

2 

NA, NB, DV 

where: NA, NB, and DV correspond 

respectively to I, J and the FA 
product in the expression; 

F A - F A = DV 
I J I JI J 
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Programmer 


FORTRAN CODING FORM 



Punching Instructions 


Cofd Form # 


Poge of 

Identification 


C fOR comment 














S') Multiple-repeated form factors involving a single node are 
entered according to the following format; 


CCl CC7 

WBAND NA, NB, NC, DV 


CC7 

2 


This i^ill result in an FA product equal to DV being entered 
in the row of the request matrix corresponding to node NA, 
for columns corresponding to nodes NB through NC, inclusive. 

6) The RECOMP option is implemented as follows: 


CCl CC7 

WBAND NA, NB, RECOMP 


CC7 

2 


Recomputes form factor from NA to NB. 


WBAND NA, RECOMP 

Recomputes form factors to/from NA from/ to all other nodes. 


7) The ZERO option is Implemented as follows: 

CCl CC7 CC7 

2 

WBAND NA, NB, 0 

Results in zero value for form factor from NA to NB, 
WBAND NA, ZERO 

Results in zero form factors from NA to all other nodes. 


8) The ONLY option is implemented as follows: 
CCl CC7 

ONLY NA, NB, NC, ND . . . 


CC7 

2 


Results in o nly the form factor rows from each node in the list 
NA, NB, NC, etc, being computed. All other form factors in the 
matrices will be set to zero. Applies to both wavebands. 
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3*3. 5. 3 


Form Factor Data Block Example 


An example of a form factor data block is presented in Figure 3-15. 

3,3. 5*4 Equivalent Form Factors 

Many radiation enclosures involve geometry that is symmetric in some 
manner and may, therefore, have many form factors that are exactly equivalent 
to other form factors because the node pairs involved are the same si^e and 
shape and "see” each other in the same way. The analyst can identify these 
situations, and if he can conveniently enter this information, a considerable 
amount of computer time may be saved in form factor computation. This capabil- 
ity has been provided, and the following sections describe the required form 
factor data block input. 

3. 3. 5. 4.1 Equivalence Data Formats 

Form factor equivalence data records appear in the form factor data block 
in the following format: 

CCl CC7 

WBAND NNI, MJ, NNK, NNL, DV 

If DV is absent, the form factor from NNI to NNJ will be computed or 
obtained from a restart tape* 

The first four variables are integer node numbers* The four numbers 
are interpreted to mean the form factor from NNI to NNJ is equal to the form 
factor from NNK to NNL. In common with the other form factor data, only one 
record of five numbers or less with the comma delineators may appear on a 
card (except for the node array). 

3. 3. 5. 5 Unit Sphere Form Factors 

For certain situations, a Nusselt or unit sphere form factor calculation 
methcd is available. This method, when applicable is generally superior to the 
normal double-integration calculation method because of reduced computation time 
and sometimes improved accuracy. The restrictions on the use of the unit sphere 
technique are as follows: 

1) Both nodes involved in the form factor calculation must be planar. 

2) No internode shadowing is allowed. 

The unit sphere option may be activated for single form factors, rows 
of form factors, or the entire matrix through form factor data block entries ^ 
Formatting is as follows. Also see Figure 3-15 for examples. 
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CCl 

HEADER FORM FACTOR DATA 
FIG 

UNIT $ Entire matrix calculated by unit sphere 

CG7 

NljU $ unit sphere used for all form factors from 
Node N1 

N1jN 2,U $ unit sphere used for form factors N1 to N2 
3*3*5. 6 Punching a Node Array-- Subroutine FFNDP 


Writing a node array for a large complex problem is exceedingly prone 
to error, yet a node array may be required (reference Section 3. 3. 5. 2) in the 
form factor data block, shadow factor data block (reference Section 3.3.6) or 
flux data block (reference Section 3.3.7). Subroutine FFNDP may be used to 
obtain a node array punched in form factor data foiTnat. This may be done in 
a preliminary run, (when node plots are generated for instance) and the User 
will then have an error “free node array to use. The operations data calling 
sequence is : 

■ y 

CC7 

CALL FFNDP 
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3.3*6 


Shadow Factor Daba 


3. 3. 6.1 Basic Concepts 

Shadow factors are fractional numbers that describe the amount of 
shadowing (blockage) enc 'untered by collimated energy incident on a nodal sur- 
face. A shadow factor of one indicates no blockage, zero indicates 100 percent 
blockage. Blockage results from other parts of the spacecraft or from the 
surface itself, if nonplanar. 

Shadow data consists of tables of shadow factors, one table per node. 
These are 171^point bivariate tables. When the direction to an energy source 
is specified, using clock and cone angles, the clock and cone angles are used 
as arguments in a double-linear Interpolation that returns a shadow factor to 
be used in computing direct irradiation according to: 

^^shadowed ^^nonshadowed 

The 171 points result from all combination of 19 clock angles and nine cone 
angles, spaced as described in Appendix C. 

The shadow factor data functions to provide a punched card entry point 
for shadow factor data that is known in advance, and to direct the updating of 
existing shadow factor data on a restart tape. 

3. 3. 6*2 Variable Definitions 


VARIABLE NAME DESCRIPTION 

FIG Configuration Name (Hollerith, 6 characters, max.) 

NODEA Node Number Array 

RECOIL Indicates RECOMP option 

TABLE Indicates a complete shadow table input 

I^AND Indicates energy waveband options: IR, SOL, 

BOTH* Defaults to BOTH. 


3. 3. 6*3 Shadow Data Formats 

MODEL and NODEA are entered according to the following formats: 
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CC7 

CONFl $ (any Hollerith name up to 6 characters) 

DVl, DV2j DV3 DVNj END $ (integer node numbers) 

Instructions to recompute shadow factor tables for a specified list of 
nodes are entered as follows: 

CCl CC7 

KECOMP DVl $ (integer node numbers) 

RECOMP DV2 


CCl 

FIG 

NODEA 


|Note that this input only applies when an RSI tape with shadow data is present. 
A complete shadow factor table for one node is entered according to: 

CCl GC7 


TABLE 

NBAND, NN, Cl, 

DVl, 

DV2, - 

— DV19 


C2, 

DVl, 

DV2, - 

— DV19 


ti 

ri 

II 

II 


II 

n 

II 

II 


tr 

M 

It 

II 


It 

n 

11 

II 


C9, 

DVl, 

DV2, - 

— DV19 


The mnemonics Cl through C9 refer to the 9 cone angles in a shadow 
factor table. The 19 data values following are for the 19 clock angles in a 
shadow factor table. If a cone number mnemonic is omitted, the 19 data values 
associated with it default to zero (100 percent shadowed). If less than 19 
data values are entered following a CX mnemonics j the data values encountered 
are stored consecutively beginning with Clock 1. For example, if 

GX, DVl, DVZ, DV3 --- DVN (N 19 or less) 

is encountered, the shadow factors for ccne angle X, clock angles 1 through N 
will be DVl through DVN. The shadow factors for clock angles N -1 1 through 19 
will default to zero. 
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Repeated data vaLues may be entered using the repeat option fur array 
data. For example, the card: 

CC7 

C6, REPEAT, 0.5, 12, REPEAT, , 7 

will enter shadow factors of 0.5 for c'oc!;. an;.;. os 1 through 12 and 0. for 
clock angles 13 through 19 in the cone angle h ari'ay. 

The user is referred to the description of the shadow factor table for- 
mat (Appendix C) for an explanation of the way the clock and the cone angles 
relate to the energy source/vehicle orientations used in shadow factor genera- 
tion. If a punched node array is desired to avoid error, subroutine FFNDP 
may be used (Reference 3. 3. 5. 6). 

3 . 3 . 6 . 4 Shadow F actor Operations Detail 

Examples of shadow factor operations are shown in Figure 3-16* 
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(a) Snado'Ji Faatcr Data^ Ho Restart (-ESI-) Tape 


HEADER SHADOW DATA 
FIG ATTEND 

KODEA 101, 102, 103, 104, lOS, 110, 120, 130, 140, END 
C INFRARED SHADOW TABLE 

TABLE IR, 101, C2, REPEAT, .1, 5, .5, .4, .4, .3 

C9, REPEAT, .4, 19 

C SHADOW TABLE FOR BOTH WAVEBANDS 

TABLE 105, Cl, REPEAT, 4, .5, REPEAT, 15, 0. 


(b) Shadov 


Factor Fata 


With Restart Tape 


HEADER SHADOW DATA 
FIG PLOAD 

NODEA 10, 21, 22, 23, 24, 25, 31, 32, 33, 70, END 

C RECOMPUTE DIRECTION 

RECOMP 21 
RECOMP 24 

C SHADOW DATA TO OVERRIDE DATA ON -RSI- 

TABLE 31, C6, REPEAT, 19, 0. 

TABLE 32, C6, REPEAT, 19, 0. 


Figure 3-16 Shadow Factor Operations Detail 
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3 , 3,7 


Flux Data 


3. 3, 7*1 Basic Concepts 

The flux data block provides a punched card entry point for direct 
irradiation fluxes that are known to the user in advance* 

From the standpoint of TtlASYS operations, information in the flux 
data block is used to define the flux data request matrix. If a flux data 
block is not encountered in the input stream, the flux request matrix is set 
everywhere to -1,0* If it is desired to force the recomputation of fluxes, | 

(.overriding flux data on a restart tape, for instance), flux data values I 

equal to -1,0 are entered for the appropriate nodes* | 

The variables NODEA and STEPN are required in addition to the flux 
data. These variables allow the input data to be sto/ed according to Che proper 
node numbers and points in orbit (Step numbers)* If a punched node array is 
desired to avoid errors, use subroutine FFNDP (Reference 3. 3*5*6). | 


3. 3*7*2 Variable Definitions 


VARIABLE NA^E 


DESCRIPTION 


NODEA 

INITL 

STEPN 


Node identification number array 

Value that fluxes may be initialized to (Optional) 
The input value for INITL will override the RSI 
data values unless set to -2,0 
Step number that following flux data applies to 


3. 3, 7, 3 Flux Data Formats 


1) NODEA, 

STEPN, and 

INITL are 

entered according 

to the following 

formats 

; 




CCl 

CC7 



CC7 

0 

NODEA 

NNl, 

NN2, — 

NNN, END 


INITL 

DV 




STEPN 

NDV 





2) Flux values may be entered in either of two formats. The 
quadruplet format is as follows: 

CC7 CC7 

2 

NODID, DVl, DV2, DV3 

101,232., 114., 99* 'V. 317 $ example 

where : 

NODID =" node identification number 

DVl = incident solar flux 

DV2 = incident albedo flux 

DV3 = incident planetary infrared flux 
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Restrictions; 


One quadruplet only per card* 

All four data values are required. No default logic applies* 
Fluy. values must be in TRASYS standard units (B tu/hr-f t^) , 

The single value format is a* ‘ollows: 

CC7 CC7 

2 

NODE = DVl, SUN ^ DV2, ALB = DV3 
PLAN = DV4 
or 

DVl, S = DV2, A = DV3, P = DV4 
Where: 

DVl = node identification number (integer) 

DV2 = incident solar flux 
DV3 = incident albedo flux 
DV4 = planetary infrared flux 

Restrictions: 

All data values encountered between NODE values pertain to 
the preceding node number 

3. 3. 7. 4 Flux Data Block Example 

An example of a flux data block is shown in Figure 3-17. 
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Figure 3-17 Flux Data Block Example 





















3.3-8 


Correspondence Data 


3.3.8, 1 Basic Concepts 

The correspondence data block performs the function of providing the 
user with an input point for the node numbering data necessary to make his 
thermal radiation model correspond on a one-to-one basis with his thermal 
analyzer RC (Resistance Capacitance) model. 


The user has the choice of using the information in this block in the 
form factor segment to combine form factors or waiting to use it in the absorbed 
heat output (QOCAL) and radiation exchange output (RKCAL, RCCAL) processor seg- 
ments. Sometimes 3 it is desirable to combine in the form factor segment because 
computation time in the radiation Interchange computation segment (GBCAL) can 
be decreased, sometimes drastically, if the form factor matrix is reduced sig- 
nificantly. Two sources of error arise with form factor combining, however* 

If surfaces with differing optical properties are combined the radiation inter- 
change computations are approximate because they proceed on the basis of area- 
weighted average optical properties. The second source of error is the so- 
called "fence" problem. Consider the 4-node configuration: 


3 


4 


1 


2 


Clearly, form factors between nodes 4 and 1 and 3 and 2 do not exist. If 
nodes 1 and 2 were combined, however, form factors F„ - „ and F . . * would 

exist, and GBCAL calculations would produce a radiation interchange factor 
between 3 and 4, obviously incorrect. Obviously this can cause erroneous 
absorbed heating computations also. 

The user may avoid these situations and still take advantage of form 
factor combining by splitting his correspondence data. One set of correspon- 
dence data, with no optical property combination or fence problems, is entered 
and used in form factor combining. The remaining correspondence data necessary 
to make the TRASYS model agree with the RC model is entered separately, and 
will be applied only in the absorbed heat and radiation interchange output 
segments. 

Three other sets of correspondence data, not entered by the user, but 
implicit to the program, is the correspondence data file that automatically 
recombines polygons. For this one the user has control in the CMCAL link of 
whether or not this is done (reference Section 5*10.) The other automatic 
applications of correspondence are the equivalent correspondence generated for 
Auto BCS DUP and Auto BCS IMAGE Options (reference Sections 3,3,3.10.3 and 
3.3.3.10.4). The user has control of whether this is accomplished in the 
Correspondence Data Block* 
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3 • . S * i! Variable nefinltloas 


Correspondeace data block variables are defined in Table 3-VI, 
Table 3-VI Correspondence Data Variable Definition 



RANGE OR 

DEFAULT 


VARIAS^LE NA>E 

OPTIONS 

VALUE 

DESCRIPTION 

FIG 

CNAME 

NONE 

CONFIGURATION NA^E 

CF 

BLANK OR 
FF * 

BLANK 

FLAG DESIGNATING CORRESPONDENCE DATA 
FOR FORM FACTOR COMBINING 
FF CORRESPONDENCE DATA WILL BE 


APPLIED TO FF's IN CM LINK 
BLANK CORRESPONDENCE DATA WILL BE 
APPLIED IN THE ABSORBED HEAT LINKS 
AND RADIATION CONDUCTOR LINKS 


3*3*8. 3 Correspondeace Data Formats 


1) FIG cards are entered according to the following format: 


CCl 


CC7 


FIG 


CNAME, CF 


CC7 

2 


2) Node correspondence data is entered according to the following 
format : 


CC7 

NODID = DVl, DV2, DVN 

NODID is an RC model node number (one to five digits, integer) 
and DVl through DVN are the TRASYS node numbers that will be 
combined into node NODID* 

3) When correspondence data is entered for nodes within a BCS that 
was duplicated under the BCS DUP or BCS IMAGE options, corres- 
pondence data for the nodes generated by this duplication pro- 
cess may be created by an additional node number at the end of 
each correspondence data card* For instance: 

NODID = DVl, DV2, * * * DVN/100 

will generate tx^o correspondence data cards as follows; 
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NODID= DVl, DV2, — - DVN and 

100 = DVl -h NINC, DV2 + NTNC, DVN + NINC 

where NINC is the increment defined on a BCS DUP or BCS IMAGE 
card within the surface data block (ref, 3.3.3*10,3 and 3*3,3.10.4). 

3. 3. 8. 4 Correspondence Data Block Structure 

The correspondence data found between a card defining a configuration 
name and the next configuration name definition card can be though of as a 
correspondence data sub-block. One of these sub-blocks is required for each 
unique geometry of the User’s problem, assuming node combine operations are 
required for each geometry. 

3 . 3 . 8 . 5 Correspondence Data Block Example 

An example of a correspondence data block is shown in Figure 3-18 

NOTE: If no form factor combining is done (L CMCAL card(s) are not present 
in operations data), correspondence data with CF = FF will be ignored. 
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3.3*9 


Operations Data Block 
Basic Concepts 


3.3. 9*1 


The operations block can be thought of as a ^!igital computer program 
coded in a somewhat mouified FORTRAN language. The most powerful statements in 
the block are calls to processor library subroutines followed by **link^‘ calls 
to primary processor program segments. Interspersed with these statements might 
be FORTRAN statements used to redefine any of the program variables in the reserve 
name list or control constant list^ calls to user^supplied routine's in the sub- 
routines block, and any branching st«ntements required for direction of problem 
solution logic. The operations data block is converted by the preprocessor to sub- 
routine ODPROG* This routine serves as the driver for processor execution. In 
general, the conversion is a one-to-one passover of FORTRAN statements. £he seg- 
ment execution calls (L cards) however, result in the operating system dependent 
language necessary to define an overlay execution. 

An operations data block for a problem involving one or more configurations 
of the model and/or more than one point in orbit consists of a series of modified 
FORTRAN statements which are divided into logical sections each of which begins 
with the definition of a new problem geometry (identified by a unique configuration 
name) and/or a new point in orbit (identified by a unique STEP number). Calculated 
data required for subsequent processor operations (with the exception of fluxes 
output by DICAL, DRCAL and AQCAL) is placed in out-of-core storage under the appro- 
priate configuration name. (Reference Figure 3-19). Fluxes are placed in out-of- 
core storage under the STEP number that identifies the appropriate point in orbit. 

The operations data block logic is processed in the order encountered. 

Each logical section (as defined above) must be serially executable, that is, 
no brandling from one section to another is allowed. DO-loops may be used, but 
they must be located entirely within a section, that is, BUILDC/ADD cards and 
STEP cards must not be contained within a DO-loop. In addition, L-cards must 
not fall within a DO-loop because the indices are lost when the ODPROG segment is 
overlaid and removed from core. Also, multiple executions of any program segments 
other than NPLOT OPLOT, or PLOT within a section will make later data retrieval 
impossible for that section. Statement numbers from 1 to 9999 may be used, and 
each statement number must be unique in the operations data block. All program 
control constants and variables in common at execution of the operations data 
block (subroutine ODPROG) may be found in Appendix A. This list is automatically 
extended to contain any constants and arrays entered in the quantities and array 
data blocks. 


3.3. 9.2 ORBGEN Option 

Writing an operations data block for the calculation of direct irradiation 
and absorbed heats for an extensive series of points in orbit can be a tedious, 
repetitive job. To alleviate this, the ORBGEN option is available. When an ORBGEN 
card is encountered in the operations data block, a package of preprocessor 
routines use the data on the card to generate the operations data code neces- 
sary to compute direct irradiation, absorbed heats, and print a set of heat/ 
rate vs time tables in a standard SINDA input format. These tables may be 
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thought of as a default output that prevents loss of computed data. All flux and 
absorbed heat data computed using the generated code is stored in the usual man- 
ner and may be retrieved, manipulated, and output in any way the user desires. 

I More than one ORBGEN card can be used in the Operations Data Block, 

OREGEN cards are defined as follows: 


Format 


CCl 


CC7 


I 


ORBGEN 


Definitions 


TYPE, TRUANT, TRUANF, NPT, IFO 


TYPE is a Hollerith variable defining the spacecraft orientation reference and 
pertinent orbit characteristics. Options are: 

INER; Spacecraft is in planetary orbit, inertial (sun or star) oriented. 

PLAN: Spacecraft is planet oriented. 

CIRP: Spacecraft is planet oriented, in a circular orbit. 

NOPL: Spacecraft is in a heliocentric orbit (no planet), 

TRUANI is the true anomaly* at the first point in orbit 0 < TRUANT < 360. 

TRUANF is the true anomaly at the final point in orbit. If TRUANF = TRUANI 360, 

data for a complete orbit will be generated* 

NPT is the number of equal true anomaly increments between the paints for which 
fluxes and direct irradiation will be computed. If the planet shadow is not 
encountered by the orbit, NPT 4- 1 points will be computed. If the planet shadow 
is encountered, NPT -F 5 points x^Lll be computed, thus describing the flux dis- 
continuities at the planet shadow points. 

H IFO is the flux-only/zero flux flag. 

Restrictions 


1) Prior to entering an ORBGEN card, the orbit must be defined through 
a call to ORBITl or 0RBIT2. 

2) Orientation must be defined through a call to ORIENT. 

3) Spin must be defined, if applicable, through subroutine SPIN, If 
spin is not zero, INER and CIRP are not allowable for TYPE, 

4) Problem geometry must be defined prior to any ORBGEN card* 

5) Options for IFO are AQ, DI, ZEROI and ZEROS. If AQ, incident and 
absorbed fluxes are computed. If DI incident fluxes only ai*e com- 
puted.^ If ZEROI, all absorbed infrared flux values will be zero. 

If ZEROS, absorbed solar fluxes will be zero. 

6) Punch/ tape flags and accuracy parameters must be defined through 
subroutine DIDTl or DIDTIS prior to an ORBGEN card. 

7) The QO segment is limited to 100 time-points 


*Reference Figure 4-7 
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3. 3. 9, 3 BUILD Option 


This option provides the user the convenience of defining the geometry 
for a configuration (in terms of block coordinate system names) with a single 
card rather than through series of user calls to subroutine SUILOC and ADD, as 
previously required by TRASYS I. 

Format 

CCl CC7 CC7 

2 

BUILD FIG, BUCl, BLK2, BLK3 

This is equivalent to the sequence 
CC7 

CALL BUILDC (BLKl, 3HFIG) 

CALL ADD (BLK2) 

CALL ADD (BLK3) 

note that the configuration name (FIG in the example) must begin to the right 
of card column 6. The BUILD option may continue for as many cards as required 
to list all of the Block Coordinate System (BCS) names that make up the desired 
configuration. A continuation flag is required when more than one card is 
needed. A BCS name should not be split between cards. 

A BUILD card x^ith columns 7-72 blank x?ill automatically default the 
Configuration name to the Model name given in the Option Data Block and all 
BCSs specified in the Surface Data Block x^ill automatically be listed to com- 
prise the configuration. If there is no model name in the Options Data Block, 
then the Model name VJill default to THING. 

If the configuration name is the same as a BCS name and the BCS name 
does not exist in the configuration the preprocessor x?ill flag the configuration 
name as an error. For example if in the Surface Data Block there are BCSs with 
the names NEW, BLKl, BLK2 and it is desired to build a configuration in the 
Operations Data Block x^ith only BLKl and BLK2 this configuration cannot be 
called KEl’I. 

3. 3. 9. 4 Operations Block Formats 

1) Step nximber cards are punched according to the follox^ing format 

CCl CG7 CC7 

2 ^ ^ 

STEP DV (integer) 

x^here DV is the integer step number, xxrith the alloxirable range 1 
to 9999. Positive step numbers are required in the Operations 
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Data Block for only the DI and DR computation links. They must 
be specified by the user for each orbit point; or if ORBGEN is 
used, they will be specified by the program. For other than DI 
and DR computations, the user may use positive step numbers as 
in TRASYS I. If they are omitted the program will insert nega- 
tive step numbers only where required. This eliminates the 
confusion TRASYS I users previously had on what constitutes a 
Step. The elimination of user step numbers was possible by 
replacing it with the more meaningful label, the configuration 
name . 

2) Subroutine calls are made in the classic FORTRAN format, with the 
word CALL beginning in CC7, Calling sequences for each user- 
accessible processor routine* can.be found in Appendix D. 

3) Computation segment (link) calls are made using the following 
format: 


CCl 

L 


CC7 

SEGNAM 


CC7 

2 


l-There SEGNAM is the name of one of the program segments contained 
in the processor library. Appendix E describes the processor 
segments and their functions. Currently allowable options for 
SEGNAM are: NPLOT, OPLOT, SFCAL, FFCAL, RBGAL, CMCAL, DIGAL, 

DRGAL, GBCAL, RKGAL, RCCAL, AQCAL, QOCAL, and PLOT. 

3*3. 9. 5 Operations Block Examples 

Operations block structure and function is illustrated by the listings 
of sample operations blocks in Figure 3-20. 

Sample 1 of Figure 3-20 is a single step operations block that generate 
three node plots of a single geometry. Sample 2 is a two-step operations block 
that generates form factor matrices for two geometric configurations. Sample 3 
is a 17“Step operations block that generates direct irradiation data at 16 poin 
in orbit, including the planet shadow in/out points. A geometry change at the 
shadow in /out points is involved. Sample 4 is a listing of the operations data 
block for a restart run that recalculates shadow factors, reads form factors, 
combined form factors, and gray body factors from the RSI tape, calculates rad: 
tion conductors (RADKs are always calculated since they are not saved on resta* 
files), and recalculates direct fluxes using shadox^ factor' tables. 
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SAMPLE 1 — OPERATIOm BLOCK FOB PLOT OPERATIONS 


header operations data 

C BUILD GEOMETRY 

BUILD CNAME1,BNAME1,BNAME2,BNAME3 

C INITIALIZE FOR PLOT 1 

CALL NDATA(1,3HGEN,0,0, 0,A20,1,332,0.,0. ,37.,0) 
C initialize FOR PLOTS 2 AND 3 

CALL NDATAS(2,3H3-D, 0,0,0) 
call NDATAS(3,1HXP,0,0) 

C MAKE PLOTS 1,2 AND 3 

L NPLOT 


SAWLE 2 ~ OPERATIONS BLOCK FOR FOB! FACTOR OPERATIONS 


HEADER OPERATIONS DATA 


BUILD CNAME1,BNAME1,BNAME2,BNAME3 

C SET FF CALCULATION PARAMETERS (PRINTS FF^'S, DOES NOT PUNCH) 

CALL FFDATA(0. ,.2,0,0. ,1.E-3,3HYES,0,0) 

C COMPUTE FORM FACTORS 

L FFCAL 

C MOVE BNAME2 SURFACES 

CALL CHGBLK(BNAME2,0. ,0. ,25. ,1,2, 3,0. ,45. ,0.) 

BUILD CNA>JE2,BNAME1, BNAME2 

C CALCULATE FORM FACTORS TOTH SAME PARAMETERS AS FOR CNAilEl 

L FI'GAL 

END OF DATA 


Figure 3-20 ScowpZe Operations Data Btoake 
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>iAMPLE 3 — OPERATIONS BLOCK FOR TWO GEOMETRI ABSORBEU HEAT PROBLEM 

HEADER OPERATIONS DATA 
STEP 1 

BUILD CNAME1,BNA^E1,BNA^E2, BRAKES 

C SET FF CALCULATION PARAMETERS, PUNCH FFS 

CALL FFDATA(0,.2,0,0,l.E-3,0,3HyES,0) 

L FFCAL 

C CALCULATE GREY BODY FACTORS 

CALL GBDATA(4HB0TH,0,2HFF) 

L GBCAL 

C SET RADK CALCULATION PARAMETERS, PUNCH RADKS 

CALL RKDATA(0, 0,0, 1000, 5HSPACE, 999, 0,0, 0,0) 

C COMPUTE RADKS 

L RKCAL 

C DEFINE ORBIT AND LOCATE SUN 

GALL ORBIT2(3HEAR,0. ,90. ,0,0, 0,120. *6080. ,0.) 

C ORIENT VEHICLE (CCS Z-AXIS TOWARD SUN) 

GALL ORIENT(3HSUN,1,2,3,0. ,90. ,0.) 

C SET DI COMPUTATION DATA 

CALL DIDT1S(0. ,0,0. ,3HYES,0) 

C COMPUTE DIRECT IRRADIATION (DICOMP PARAMETERS DEFAULT TO COMPUTE ALL) 

L DICAL 

L AQCAL 

STEP 2 

C UPDATE TRUE ANO^^ALY, SET UP TO COMPUTE PLANET AND ALBEDO FLUXES 

TRUEAn = 30 . 

CALL DICOMP(l,0,O) 

L DICAL 

L AQCAL 

STEP 3 

TRUEAN =60. 

CALL DlCOMP(l,O,0) 

L DIGAL 
L AQCAL 
STEP 4 

TRUEAN =>90. 

CALL DICOMP(1,0,0) 

L DICAL 
L AQCAL 
STEP 5 

C SKIP OVER PLANET SHADOW 

TRUEAN =270. 

CALL DI COMP (1,0,0) 

L DICAL 
L AQCAL 
STEP 6 

TRUEAN =300 . 

CALL DICOMP (1,0,0) 

L DICAL 
L AQCAL 

STEP 7 

TRUEAN = 330. 

CALL DIC(MP(1,0,0) 

L DICAL 

L AQCAL 


Figure 3-20 (Cont) 


REV . 1 


8 


STEP 

C STUFF TRUEAN = 0. VALUES (DUPLICATE POINT) 

CALL STFAQC360. ,0,1) 

STEP 9 

C COMPUTE data AT SHADOW ENTRY POINT (DAYSIDE GEOMETRY) 

TRUEAN =SHADIN - .1 

CALL DICOMP (1,0,0) 

L DICAL 
L AQCAL 
STEP 10 

C COMPUTE DATA AT SHADOW OUT POINT (DAYSIDE GEOMETRY) 

TRUEAN =SHAOUT + . 1 

CALL DI COMP (1,0,0) 

L DICAL 
L AQCAL 

C PUNCH AQ.AQAVG VS, TIME TABLES - DAYSIDE 

I CALL QODATA(3HALL,O,2HNO,3HYES,0,0,0,4HBOTH) 

L QOCAL 
STEP 11 

C BUILD DARKSIDE CONFIGURATION 

I BUILD CNAME2,BNAM1,BNAME2,BNAF1E4 

C calculate FFS (FFDATA PARAMETERS SET IN STEP 1) 

L FFCAL 

C CALCULATE GREY BODY MATRICES 

( CALL GBDATA (4HB0TH,0,2HFF) 

L GBCAL 

C SET EADK CALCULATION PARAMETERS, COMPUTE RADKS 

CALL RKDATA(0,0, 0, 1000, 5HSPACE, 999, 0,0, 0,0) 

L RKCAL 

C REORIENT TO PLANET 

CALL ORIENT(4HPLAN,1,2,3,0. ,90. ,0.) 

TRUEAN =120, 

L DICAL 

C COMPUTE ABSORBED HEATS 

L AQCAL 
STEP 12 

C UPDATE TRUE ANOMALY, STUFF HEAT DATA FROM STEP 11 BECAUSE ORBIT 

C IS CIRCULAR, PLANET-ORIENTED 

call STFAQ (150. ,0,11) 

STEP 13 

CALL STFAQ (180. ,0,11) 

STEP 14 

call STFAQ(210. ,0,11) 

STEP 15 

CALL STFAQ (240. ,0,11) 

STEP 16 

C STUFF DATA FOR SHADOW ENTRY POINT (DARKSIDE CONFIGURATION) 

CALL STFAQ (SHADIN + .1,0,11) 

STEP 17 

C STUFF DATA FOR SHADOW OUT POINT (DARKSIDE CONFIGURATION) 

CALL STFAQ(SHAOUT - .1,0,11) 

C PUNCH AQ,AQAVG VS TIME TABLES - DARKSIDE 

CALL QODATA(ISARY,0,2HNO,3HYES,0,0,0,4HB0TH) 

L QOCAL 
END OF data 

FT,guve 3-20, (aont) 


Sample 4 — Orbit Generation from an ORBGSl] Card 


C ORBIT GENERATION CARD FOLLOWS 
ORBGEN CIRP, 0.0, 360.0, 4, AQ 


C * * * * * ft ft ft ft ft ft ORBIT GENERATION STARTS HERE 
STEP 10000 

TRUEAN = 0. 

TRUANF = 360.000 

TRUANI = 0. 

lAI = 0 

IAS = 0 

PLTYPE = 6HPLSAVE 

CALL DICOMP (0,0,0) 

L DICAL 

NSPFF = 10000 

PLTYPE = 6HPLREAD 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

STEP 10001 

CALL STFAQ (TRUANF, 0,0, 1000) 

STEP 10002 

TRUEAN = 90.000 

CALL DICOMP (0,0,10000) 

L DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

STEP 10003 

TRUEAN = 180.000 

CALL DICOMP (0,0, 1000) 

L DICAL 

CALL AQDATAdAI, IAS, 0,0,0) 

L AQCAL 

STEP 10004 

TRUEAN = 270.000 

CALL DICOMP (0,0, 10000) 

L DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

STEP 10005 

IF(SHADIN.LT.O.) GO TO 90400 

TRUEAN = SHAD IN-0.1 

IF (TRUEAN . LT . TRUANI . OR . 

TRUEAN. GT. TRUANF) GO TO 90000 

CALL DICOMP (0 , 4HZERO , 10000) 

L DICAL 

CALL AQDATA(IA1, IAS, 0,0,0) 

L AQCAL 

90000 CONTINUE 

STEP 10006 

TRUEAN = SHADIN+0.1 

IF (TRUEAN , LT . TRUANI .OR . 

TRUEAN. GT. TRUANF) GO TO 90100 
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Sample 4 Orbit Generation from an ORBGEN Card (continued) 


CALL DICOMPCO, 0,10000) 

L DICAL 

CALL AQDATA(IAI,IAS,0,0,0) 

AQCAL 

90100 CONTINUE 
STEP 10007 

TRUEAN = SHAOUT+0.1 

IF (TRUEAN . LT . TRUANI , OR . 

TRUEAN. GT.TRUANF) GO TO 90200 

CALL DICOMP (0.4HZERO, 10000) 

L DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

90200 CONTINUE 
STEP 10008 

TRUEAN = SHAOUT-0.1 

IF (TRUEAN . LT . TRUANI . OR . 

TRUEAN. GT.TRUANF) GO TO 90300 

CALL DICOMP (0,0, 10000) 

L DICAL 

CALL AQDATA(IAI, IAS, 0,0,0) 

L AQCAL 

90300 CONTINUE 
90400 CONTINUE 

CALL Q0DATA(3HALL, 0,0, 0,0,0, 0,0,) 

L QOCAL 

C 

C * A ***** A * A ft * ORBIT GENERATION ENDS HERE * 



Sample 5 Operations Block for Restart Run 

HEADER OPERATIONS DATA 

STEP 1 

BUILD CNAME,BNAME 
CALL RSTOFF 
L SFCAL 

CALL RSTON 

CALL FFDATA(0,0,0,0,0,0,0,2HNO) 

L FFCAL 

I CALL GMDATA(0,5HFFNE1:J,FF, 0,0,0) 

L CMCAL 

CALL GB DATA (4HBOTH , 0 , 2HCM) 

L GBCAL 

I CALL RKDATA(0,2HN0,0,100,5HSPACE,999,0,0,2HNO,0) 

L RKCAL 

CALL ORBIT2 (SHEAR, 0., 90., 0.,0.,0., 100. *6080. ,0.) 
CALL DIDT2S(0,O. ,180. ,0. ,0. , 0,, 100. *6080. ,2HN0,0) 
I CALL RSTOFF 

L DICAL 

END OF DATA 
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Operntions 




The siniplest restnrt opjrc'ition ii5 picking up a run interrupted by a 
systetiT abort ie*g., time limit) where there is no requirement to modify the 
input deck. Hiis is accomplished by specifying KSI. in the options data^ using 
the previousiv generated KSO tape as an KSI tape and submitting the same deck 
used on the previous run. The same thing can be accomplished by submitting an 
Input deck consisting only of an options data block which must of course specify 
an KSI tape. This is possible because the entire input deck resides on the 
\S1 tape. If the interrupted run used an RTO tape, it should be specified 
and mounted when making the restart run. This enables the user to reclaim 
interim data from the FF^ GB, DI and SF segments. 

All restart operations involving more than a simple resumption of an 
interrupted run are accomplished through edit commands. All input decks used 
in this type of restart run will consist only of an options data block and an 
edit data blocks Any data (.numerical or logic) may be inserted or deleted from 
the input deck using edit commands. The editing is conveniently accomplished 
using the usual EMERG edit commands while referring to the output listing from 
the previous run for line number information. The user should keep in mind that 
the input deck, as edited is written to the USO tape. Therefore, vjhen restart- 
ing from a tape generated by a previous restart/edit run, the previously used 
edit commands are not required, and will in fact probably generate errors* 

Calls to subroutines RSTOFF and RSTGN are edited into the operations data 
block to give the user direct control over the reading of the processor phase 
data on the RSI tape. CALL RSTOFF says in essence, do not read the RSI tape 
until further notice, CALL HSTON says read it until further notice. The opera- 
tions data begins as if an RSTON call was in effect. The use of RSTOFF can be 
illustrated using a common parametric study situation. Say that a user has 
generated radiation interchange factors for a particular model and has the 
pertinent form factors and gray body factors on a restart tape* He desires 
to change some surface properties and generate new radiation conductors. This, 
of course, involves editing in calls to subroutine MODPR prior to the L GBGAL 
card* Hov/ever, if a call to RSTOFF is not inserted ahead of the L GBCAL card, 
the gray body matrix residing on the restart tape will be read in, and the 
radiant interchange factors obtained will be identical to those of the previous 
run* 

The user should keep in mind that significant amounts of data may be lost 
when executing without an RTO tape. This is illustrated by the following explan- 
ations of the RSO/ RTO write sequences: 

a) The FFCAL segment writes to the RSO tape at the end of each row of form 

factor computations* It writes to the RTO tape after every 10 form factors 
are computed. The same is true of image factors in the RB CAL link. 
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b) The form factor combining link writes to the RSO after each row of form 
factors are combined. It does not write to the RTO tape, 

c) The DICAL and DRCAL segments write to the RSO tape at the end of each 
orbital time point (step) . They write to the RTO tape after each 10 
flux calculations. 

d) The SFCAL segment writes to the RSO tape after each nodal shadow factor 
table computation is complete. It does not write to the RTO tape. 

e) The GBCAL segment writes to the RSO tape at the end of the matrix 
inversion process for each waveband. It writes to the RTO tape at 
the end of each of three steps in the process of inverting the matrix. 


The following paragraph applies to restart operations using UNIVAC 
EXEC 8 operating systems only. 

In all TRASYS processor printout, when an RSO tape is used, restart 
tape record numbers are printed whenever information is written to the RSO 
tape. When this run ends, whether from time limit, abort or normal exit, there 
will be some record number, say for instance 100, near the end of the printed 
output. This means that presumably 100 records of valid information exist on 
the RSO tape. It is a peculiarity of the Univac system, as applied to TRASYS, 
that it cannot reliably differentiate between a parity error and the end of 
information on an RSI tape. Thus, if this 100 record tape were used on a 
restart run, and a parity error was encountered at record 50, calculations would 
begin at record 50 and much of the data generated on the first run would be 
recomputed. This may be necessary if there is a true parity error on the tape, 
but if the error was generated by the tape drive, half of a perfectly good tape 
would be wasted. This potential problem is the reason for allowing the user to 
specify RSREC. Had the card RSREC=100 been in the options data on the second 
run, the parity error would have resulted in an abort rather than recomputing. 
The abort would provide the option to try the run again to see if the parity 
error was spurious or really on the tape. If not specified, RSREC defaults to 
zero. 
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3-3. 9.7 


Description of Restart Files 


3. 3*9. 7.1 Permanent Restart Output Tape - RSO 

A complete RSO tape consists of two files. The first file contains 
images of all cards in the input data that were present in the original run* 

In addition, this file contains the edit information that allow editing of the 
input data in subsequent runs* After editing, this file is processed by the 
preprocessor in the usual manner in preparation for processor operations. 

The second file contains data that was output by the processor segments as the 
user-defined Operations Data logic was processed. 

3. 3* 9.7. 2 Permansnt Restart Input Tape - RSI 

The RSI tape is an RSO tape from a previous run that is now to be used 
as input for a restart run. Input from this tape can be edited as required 
using edit statements. Data from tapes other than the RSI tape may be merged 
into the TRASYS model (first file of RSI tape) by adding CMKRG or EMERG state- 
ments to the TRASYS model as required. As a reminder, CMERG files are TRASYS 
input data in BCD form. EMERG files are the first files of other RSI/RSO tapes 

3. 3. 9. 7, 3 Temporary Restart Output Tape - RTQ 

The RTO tape is used to save partially completed calculated data in the 
DICAL, DRCAL, FFCAL, RBCAL, and GBCAL segments to minimize the amount of data 
lost upon run abort due to time limit, equipment failure, etc. 

3.3. 9.7*4 Temporary Restart Input Tape - RTI 

The RTI tape is an RTO tape from a previous run that is now to be used 
as input for a restart run. 


REV, 1 
3-97 


FORTRAN CODING FORM 


PuncTiing Instructions 


Ca»*'1 Form # 


* ItJentificolion j 

' I . . I .... I ♦ 


C fOR COMMENT 


statement c 

NUMBER « 


5 16 / 10 t3 ?Q 

HEADER SUBiROUTIiNE DAiTA i i 

VA L,UE , V , ■ 

S UBR OUT IN E VA.LUE ( X,. Y , ZJj 


SORT (X’t'*2+.Y **2 


RET, URN , . , . , . . , . . , 


FORTRAN STATEMENT 

30 35 <0 *S 


FECAL 



F.FR.OW. . 

1- . 1..^^ 

,, ,* 1....^ i. — 1 — 1 — 


S UBRO.UT I,NE .FF,ROW , . , , , . 

... 1 ^ J 

■ - 1 . . ■ 


COMMO 


1 


PER, S.U 


I F f.SU Ma 


WRITE f NF,P.VN.OD 


TURN 


G,0 TO , .10.0, , 


Ii= I N. NN.O 


iSUM FiOR ROW.I6..3 4H I iS GREATER tTHAN ,Z 


run.) _ , . . , 


.AST . , 


END, , 


D I .C A|L I .... 1 ... I 


D I PREP , , , 


I Subroutine Data Block Example 

























3.3,10 


Subroutine Data Block 


3*3.10.1 Basic Concepts 

The subroutine data block is a collection of FORTRAN language sub- 
routines supplied by the user in order to extend or modify TRASYS capabil- 
ities for the problem at hand. These subroutines may be either user-address- 
able (from the operations block) or program-addressable^ from the various 
computation segments* 

Unless the user is creating what amounts to a major rewrite of a 
computation segment, the program subroutines in his subroutine block will 
bear the same name as processor library subroutines* The effect of his name 
duplication is that the user-supplied routine in the subroutine data block 
is compiled in lieu of the processor library subroutine prior to execution. 
Removal of such a routine reactivates the like-named library routine. 

Three deviations from FORTRAN language are defined for the subroutine 
data block* L-cards are used to identify subroutines with particular processor 
segments, R-cards are used to alert the program to the beginning of a new sub- 
routine CUNIVAC only) and COM^ION cards are used to automatically supply pro- 
gram common to the subroutines. 

3.3*10*2 Subroutine Block Formats 


Subroutine data block format is illustrated in Figure 3-21* The 
segment names on the L-cards are strictly order-dependent. The L-cards with 
their associated subroutines need not all be present, but they must be 
encountered in the order shown below. Subroutines in the leading sub-block, 
with no L-card, are addressable only from the operations data block* 

No L-card 
L FFCAL 
L 3FCAL 
L NPLOT 
L OPLOT 
L DICAL 
L GBCAL 
L AQCAL 
L QOCAL 
L REGAL 
L PLOT 

L RCCAL (or RKCAL) 

L DRCAL 
L CMCAL 
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Common cards are optional. When used, they serve to insert all 
labeled and blank common lists, associated with the segment named on the 
preceding L-card, into the subroutine. Appendix A-1 defines the variable 
names in common for subroutine ODPROG and the various segments. 

Note that COMMON cards preclude beginning a subroutine block comment 
card with the word COMMON. 

R“Cards must immediately precede each subroutine name card (UNIVAC 
only), with no intervening L-^ards or COMMON cards, 

3.3,11 End of Data Card 

The input deck should conclude with an END OF DATA card punched 
according to the format. If it is missing it will assume one and write a 
caution message. 


CCl 

END OF DATA 
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4. 


USER CALLED ROUTINES 


4*1 Baa.'C Conceptis 


User called routines may be defined as those subroutines 
and computation segments callable from the operations block. 

Unless one or rore subroutines of this type are entered In the 
user^s subroutine data block-j the usei: callable subroutines 
contained in the processor library comprise the entire list of 
user callable subroutines. Segments cannot he entered in the 
input stream* 

4.2 Processor Libi“ary 

The user callable processor library routines are listed 
below. In general, they are grouped according to their associa- 
tion with each of the processor computation segments. Page ref- 
erences for the subroutine descriptions in Appendix D are 
included . 

4.2*1 Library Listing of Subroutines 



Name 

Page 

Name 

Page 

General Subroutines 

BUILDC 

D-5 

ADD 

D-2 


CHGBLK 

D-6 

FFSDP 

D-16 


LIST 

D-19 

NODDAT 

D-26 

Plot Package 

NDATA 

D-25 

ODATA 

D-27 

Subroutines 

NDATAS 

D-25 

ODATAS 

D-27 


PLDATA 

D-32 



Form Factor 

FFDATA 

D-15 

ADSURF 

D-3 

Subroutines 

C^fl)ATA 

D-7 

RBDAIA 

D-36 

Direct Irradiation 

ORB IT 1 

D-29 

0RBIT2 

D-30 

Subroutine 

DIDTl 

D-9 

DIDTIS 

D-9 


DIDT2 

D-10 

DIDT2S 

D-IO 


SPIN 

D-41 

ORIENT 

D-31 


DICOMP 

D-8 

DITTP 

D-12 


DITTPS 

D-12 

DRDATA 

D-14 

Restart 

RSTON 

D-40 

RSTOFF 

D-40 


Routines 


REV* I 
4-1 



Marne 

Page 

Name 

Page 

Radiation inter“ 

GBDATA 

D-18 

RKDATA 

D-39 

change Subroutines 

GBAPRX 

D-17 

RCDATA 

D-37 

Absorbed Heat 
Subroutines 

AQDATA 

D-4 

STFAQ 

D-42 

Absorbed Heat 
Output Subroutine 

QODATA 

D-34 

QOINIT 

D-35 

Data Modification 

HODAR 

D-20 

MODPR 

D-21 

Subroutines 

MODTR 

D-24 

MODPRS 

D-22 


MODSHD 

D-23 



Planet Surface 

DIDT3 

D-11 

DIDT3S 

D-U 

Subroutines 

SURFP 

D-43 



4*2.2 Library Listing of Processor Segments 


Plot Package 

NPLOT 

E-2 

OPLOT 

E-2 

Segments 

PLOT 

E-2 



Form Factor 
Segments 

FFCAL 

E-3 

CMCAL 

E-3 

Direct Irradiation 
Segments 

DICAL 

E-4 

DRCAL 

E-4 

Shadow Factor 
Generator Segment 

SFCAL 

E-5 



Radiation Inter- 

RKCAL 

E-6 

GBCAL 

E-6 

change Segments 

RCCAL 

E-6 

RBCAL 

E-3 

Absorbed Heat 
Segment 

AQCAL 

E-7 



Absorbed Heat 

QOCAL 

E-8 




Output Segment 
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Subroutine Descriptions 
Basic Concepts 


4.3.1 


The user-callable subroutines in the processor library 
fall Into two functional groups. The most numerous group con- 
sists of subroutines used to define the program variables and 
set the logic flags that are required before a computational seg“ 
ment can be linked into the processor and executed. Variable 
definition in this manner, as opposed to definition from the data 
blocks, achieves two important goals. First, in any complex prob- 
lem many segment calls are made, necessitating frequent redefiui- 
tion of program variables. Under these conditions, data block 
input would be redundant* Second, the subroutine calls, in 
classic FORTRAN format, form natural groups of input variables, 
and as the calls are input serially in the user*s operations 
block, he is pi^ovided a highly visible presentation of the vari- 
able definitions existing at each stage of his execution. Thus, 
if the user carefully proofreads a listing of his operations 
block, his logic and variable definitions should be error-free. 

If his geometry inputs have been verified using the plot package, 
the user may proceed with some confidence to consume a large 
block of computer time. It is the hope of the TRASYS designers 
that these features will ease somexi?hat the all too prevalent gar- 
bage in-garbage out syndrome. 

The second group of processor library subroutines per- 
form data handling tasks that eliminate redundant calculations. 

For example, direct irradiation may be required at 15 orbit 
points for a sun-oriented spacecraft. Armed with the knowledge 
that his solar flux is everywhere constant (outside the planet 
shadotv) , the user may compute the solar flux in Step 1, then use 
the STFAQ routine to retrieve the data from Step 1 and place it 
in data storage for any of the other 14 steps he desires. 

Appendix D is composed of summary descriptions of each 
user subroutine. Definitions of each variable in the calling 
sequences are given, together x^lth their default values, where 
applicable. The additional material necessary to use the sub- 
routines Is presented in the remainder of this section. After 
achieving a working knowledge, the user should find Appendix D 
sufficient for his quick-reference needs. 

4.3.2 General Subroutines 


Subroutines BUILDG and ADD are used to choose, from the 
various blocks of surfaces in the surface input data, Xi7hat 
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blocks are to be assembled to create the problem geometry. Also, 
the relative spatial positions of the surfaces and nodes in the 
active blocks may be changed using subroutine CHGBLK. 

4. 3. 2.1 Subroutine BUILDC 

Calling Sequence: CALL BUILDC (BCSNAM, CONFIG) 

This subroutine begins the process of assembling the 
geometry desired from the blocks of surfaces in the surface data 
block. BCSNAM Is any block coordinate system name found in the 
surface data block* If no BCS is named in the surface data 
block, CALL BUILDC (ALLBLK, NAME) will define a geometry consisting 
of the entire surface data block* CONFIG is any name Cl to 6 
character Hollerith string) chosen by the user to identify his 
active model configuration. This call must be made for geom- 
etry definitions or after geometry redefinition via subroutine 
CHGBLK. A BUILDC call voids any previous BUILD/ ADD calls and any 
Surface Property Modification Subroutines calls e.g.,M3DAR, MODPR. 

4*3p2.2 Subroutine ADD 

Calling Sequence: CALL ADD (BCSNAM) 

This subroutine adds another block of surfaces to the 
geometry defined by previous BUILDC and ADD calls* One BUILDC 
call must precede any ADD call in the operations block. 

Note; Direct calls to BUILDC and ADD have been made essentially 

osbsolete by the BUILD card. See Section 3. 3*9. 3 and Related 
Information for subroutine BUILDC in Appendix D. 

4. 3*2. 3 Subroutine CHGBLK 

Calling Sequence: GALL CHGBLK (BCSNAM, TX, 'K, TZ, IROTX, IROTY, 

IROTZ, ROTX, ROTY, ROTZ) 

This subroutine is used to spatially relocate blocks of 
surfaces by redefining a block coordinate system's location and 
orientation In central coordinate system 3-space. BCSNAM is the 
name identifying the block coordinate system being changed. Its 
spelling must be exactly as called out in the BCS data block. 

The arguments TX, TY, TZ , RQTX, ROTY, ROTZ are the trans- 
lation and rotation parameters necessary to transform the central 
coordinate system into the block coordinate system in its new 
position* These parameters are further discussed in paragraph 
3.3*4. 
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The arguments IROTX^ IROTY and IROTZ control the order in 
which the rotations ROTXj ROTY, and ROTZ are performed. They may 
take on the integer values 1, 2, or 3. For example, for IROTX = 3, 
IROTY - 1, and IROTZ = 2, the rotations will be performed in the 
order ROTY first, ROTZ second, and ROTX third. If ^ero is passed 
for all three arguments, the default values IROTX - 1, IROTY = 2, 
and IROTZ - 3 will result and the rotations will be performed ROTX 
first, ROTY second, and ROTZ third. 

4.3.3 Form Factor Subroutines 


The subroutine FFDATA is used to set the variables and 
control constants required before executing the FFCAL computation 
segment. An FFDATA call prior to all FFCAL executions is not man- 
datory because each FFDATA argument assumes a default value (ref 
Appendix D) . The variables defined by aa FFDATA call will hold 
for any subsequent FFCAL executions in the operations block. 

Subroutine CMDATA accomplishes a similar function prior 
to execution of the form-factor combining segment, CMCAL. 

4 . 3 . 3 . 1 Subroutine FFDATA 

Calling sequence; CALL FFDATA (FFACC, FFACCS, FFNOSH, FFRATL, 

FFMIN, FFPRNT, FFPNCH, FFNAC) 

FFACG is the variable that provides user control of the 
node surface elemental breakdown used for double integration 
form factor calculations. In general, the accuracy of a form 
factor calculation is proportional to the ratio of each elemental 
area divided by the square of the distance between each elemental 
area pair involved. Thus, if the element count for each node 
were chosen so that a given value of this ratio were never ex- 
ceeded, then the error of each form factor calculation would 
similarly be limited* The form factor segment logic provides 
for this, and FFACC is the upper limit allowed for the area - 
distance squared ratio. The default value used, (FFACC ^05) 
provides form factor accuracy of approximately 2 percent for 
parallel flat plates. Background information for this accuracy 
relationship can be found in Appendix B. The user is cautioned 
that his problem run time is tied directly to his nodal element 
count, and indiscriminate reduction in the value of FFAcC can be 
costly* The recommended approach to accuracy improvement is to 
selectively re-compute suspect form factors using a reduced 
FFAcC value. 
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When node pairs are situated such that the Interelement 
distances vary a great deal, it is sometimes necessary to tempo- 
rarily subdivide node pairs in order co obtain sufficient accuracy. 

The parameter FFRATL controls this. The number of elements is 
dictated by a weighted average distance and compared to FFRATL. 

If this value exceeds FFRATL, the node pair is subdivided. When 
accuracy problems are encountered with node pairs having large 
interelement distance variation (nodes with congruent edges, for 
instance), the recommended procedure is to enter an FFRATL value 
lower than the default value (FFRATL = 15.) j selectively re- 
compute the form factors. Wo change in FFAGC should be required 
for this operation. Additional descriptive material on this 
technique can be found in Appendix B- 

The elemental breakdown of node pairs also influences 
form factor accuracy when shadowing by intervening surfaces is 
involved. For large magnitude form factors, the node pair element 
breakdown required to satisfy shadowing considerations is computed 
and used if it exceeds that dictated by separation distance (see 
Appendix B) . The element count dictated by shadowing is inversely 
proportional to the parameter FFACCS . The default value for FFACCS 
(FFACCS “ *1) was chosen based on experience. If the user knows 
that one or more of his significant form factors will be heavily 
influenced by shadowing, the recommended procedure is to selec- 
tively compute such form factors using a reduced value of FFACCS. 

The parameter FFMIN is used to reduce the bulk of the BCD 
Card output that results when a large form factor matrix is punched 
in form factor data block input format for re-use. Significant 
preprocessor time can be saved if the insignificant form factors 
are eliminated from the form factor data block. The default value, 
l.E-6 is sufficiently small that it does not materially affect the 
energy balance of the problem. 

FFNAC is the flag to eliminate the usual check of the cur- 
rently-defined node number array against the node array on the re- 
start (RSI) tape. This allows a user to make use of form factors 
computed for a different geometry, provided the user knows the 
geometry change does not affect them* 

The remaining FFDATA parameters, FFNOSH, FFPRWT, and 
FFPNCH are used to override shadowing computations and to provide 
print and punch/tape output options* The user is referred to 
Appendix D for instruction in their use. 

An FFCAL-related variable, IFFSHO, is used to control whether 
or not form factors to shadox^er-only nodes will be computed. The state 
meat IFFSHO = NO prior to FFCAL will bypass form factor calculations to 
the shadower-only nodes. 


REV.l 

4-6 


4 , J * :J , 2 Subroutine CMDATA 


Calling sequences; CALL CMDATA (NFIGFF, NFIGCO, NFFTYP, lAUTQC, 

CMPRT) 

NFIGFF and MFIGCO are configuration names* The CMGAL segment 
will retrieve form factors (or image factors]* stored under the name 
NFIGFF, combine them by applying CORRESPONDENCE DATA defined under 
configuration NFIGCO and store the resulting matrix under the current 
configuration name. Both rhese variables default to the current con- 
figuration acme, as defined on the most recent BUILD Card. NFFTYP 
alerts CMCAL to the type of form factors to be found under NFIGFF. 

FF means ordinary form factors, RB means image factors, as generated 
by the RBCAL segment. If lAUTOC is entered as NO, polygons will 
remain uncombined. CMPRT is the print/no print flag for the combined 
form factors. CMPRT defaults to YES (NO for CDC version). If CMDATA 
is not called, CMCAL proceeds on the basis of default values* 

4 * 3 * 3 ♦ 3 Adiabatic ^'Closure** Surfaces 

It is sometimes desirabx , to conserve energy in computing the 
IR radiation interchange factors in a thermal radiation problem that 
does not constitute a complete enclosure. The usual means of doing 
this Is to complete the enclosure with an adiabatic reflector surface. 
This can be accomplished by entering a rudimentary closure surface in 
the surface data and using subroutine ADSURF to add the closure surface 
to the form factor matrix after form factors have been computed for the 
real surfaces in the problem/ The ADSURF call should be followed by a 
GBDATA and a RICDATA or RCDATA call. An example of the application of 
this technique is shown in Appendix J* 

S ubroutine ADSURF 


Calling Sequence: CALL ADSURF (BCSN, NFIGFF, AREA) 

BCSN is the block coordinate system name under which the 
closure surface appears in the surface data. Only one side of enclo- 
sure surface can be active. NFIGFF is the configuration name under 
which the new modified form factor matrix is to be stored. 

When ADSURF is called, the form factor matrix is read under 
the current configuration name, and form factors from each node to 
the closure surface are computed by subtracting the form-factor row 
sums from 1,0, This new row of form factors is added to the form 
factor matrix and the resulting matrix is stored under the name given 
for NFIGFF, 
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AREA is the area of the adiabatic closure surface. If 
desired 3 the area in square feet may be entered as this argument. 

If it is more convenient, the closure surface can be defined with the 
correct dimensions in the surface data block and the area will thus be 
computed. To use the computed area, enter 0 (aero) for this argument. 

A subsequent GBDATA call must be made with the First and Last 
arguments always as shown. Call GBDATA (2HIR,6HNFIGFF,2HFF) 

4.3. 3.4 Subroutine RBDATA 

Calling sequences; CALL RBDATA (NFIGFF, FFACG, FFACCS, FFRATL, 

FFPRNT) 

Subroutine RBDATA is used to define the parameters necessary 
to execute the RBCAL program segment that computes form factors (also 
known as image factors) that include the effects of specular surfaces 
in the model. NFIGFF is the configuration name used by REGAL to 
retrieve the ordinary form factors previously computed by FFCAL. 

NFIGFF defaults to the current model name. The remaining RBDATA 
parameters are the same as defined under FFDATA and carry the same 
default values. If RBDATA is not called, RBCAL proceeds on the basis 
of default values. 

4.3.4 Plot Package Subroutines 
4. 3.4,1 Subroutines NDATA, NDATAS 

Calling sequences: CALL NDATA (NV, VU, SCL, NACT, ISHO, SELN, TIT, 

IROTX, IROTY, IROTZ, ROTX, ROTY, ROTZ) 

CALL NDATAS (NV, VU, SCL, NACT, ISHO) 

These calls are used to define plot parameters prior to 
executing the NPLOT program segment. A call to one of these routines 
prior to an NPLOT execution is not mandatory, because all arguments 
have default values (ref. Appendix D) . Shadow-only surfaces (ref. 
Section 3,3.3,11) are not included in the node plots unless argument 
ISHO is entered as YES. The variables defined by NDATA or NDATAS 
calls will hold for any subsequent NPLOT execution in the operations 
block. 
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The NV parameter allows the user to make up to 6 NDATA 
or NDATAS calls, thereby defining up to 6 plot operations, before 
executing NPLOT* One NPLOT execution will execute all the plot 
operations defined* 

VIT defines the type of plot desired. The options are 
3H3-D, IHX, IHY, IHZ, 3HALL, and 3HGEN. 3-D results in a 3- 
dimensional pictorial plot. X, Y, and Z produce orthographic 
projections of the geometry as seen from the X, Y, and Z axes 
of the CCS, respectively- ALL results in four frames, 3-D, X, 

Y, and Z* GEN is a general 3-D plot, where the user has control 
of the orientation of the CCS axes relative to his point of view. 

SCL is the plot scale factor, defined by; 

SCL = length on plot frame/length of surface where 
lengths of surfaces are as defined in the 
surface data block. 

The user should keep in mind that his hardcopy plot 
frames are probably about 17.8 cm (7 Inches) square. 

NACT is the flag that controls whether or not active 
side indicating arrows appear on the plots. NACT defaults to NO. 
If YES is entered as this argument, arrows will be shown. 


SELN is the name of the array that contains a list of 
the integer node identification numbers the user desires tc plot 
selectively. The selective node number array is entered in the 
array data block. 

TIT is the name of the Hollerith array containing any 
title the user desires on his plot frame. Up to 66 characters 
are allowed. 

IROTX, IROTY, IROTZ, ROTX, ROTY, and ROTZ are the group 
of six parameters defining point of view from which the user 
will ^*see'^ his problem geometry in a general view. For ROTX, 
ROTY, and ROTZ identically zero, the central coordinate system 
appears in plots as shown in Figure 4-1. 

ROTX is the rotation angle about X, that rotates the 
plot reference, coordinate system into the Central Coordinate 
System, Y toward Z positive. ROXY is the corresponding angle, 
about Y, Z tox^ard X is positive. ROTZ is the corresponding 
angle, about Z, X tox^/ard Y positive. 
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Figure 4-1 Uode Plot Coordinate System Reference 


Using Figure as the reference positions the user 
may arbitrarily relocate the axes by defining ROTX, ROTY and 
R0T2 to relocate the reference system so that it coincides with 
the desired systems location. The order of the rotations is defined 
using IKOTX, IKOTY, and IROTZ, 

4. 3. 4. 2 Subroutines ODATA, ODATAS 

Calling sequences; CALL ODATA (KV, VU, SCL, SCLR, RPLN, TRUEAN, 

TTWEST, TIME, SELN, TIT, IROTX, XROTY, IROTZ, 

. ROTX, ROTY, ROTZ) 

call ODATAS (NV, VU, SCL, SCLR, RPLN, TRUEAN, 
TIMEST, TIME) 

These subroutines are functionally analogous to NDATA 
and NDATAS in relation to execution of the orbit plotter segment, 
OPLOT. 


UV is defined and functions identically with the simi- 
larly named parameter in NDATA, VU defines the plot type. 

Options are 3H3-D, 4HBETA, 5HCIGMA, 3HSUN, 3HALL, and 3HGEN. 

3H3-D results in a 3-diTnenslonal pictorial plot of the planet 
and spacecraft. 4HBETA results in an edge^on view of the orbit 
plane, with the BETA angle shown true. The 5HCIGMA view places 
the orbit plane in the plot frame, as seen from north of the 
celestial equator. SHALL produces four frames, 3-D, CIGMA^ BETA, 
and SUN. GEN results in a plot x^ith the orbit coordinate system 
axes rotated according to user definition* SCL relates the 
user^s geometry dimensions to plot scale according to; 


SFAC = SCL/OPMAX (NNS) 


Inhere 


SFAC is the absolute surface scale factor (same as SCL in 

NDATA) ^ 

OPMAX (NNS) is the maximum extension of any surface point 

from the CCS origir* (user surface data units). 

The user should generally enter a value of SCL equal to 
about 1/2 the desired planet radius in inches of plot frame* 

SCLR is the distance Trom the planet center where the 
user desires to see his CCS oiigin (in inches on plot frame) , 

RPLAN is the planet radius as plotted in inches. The 
planet radius default value used is 3,56 cm* (1,4 inches). The 
default values for SCL and SCLR are related to RPLAN according 
to the relationships: 

SCLR = 8,”RPLAN/7* 

SCL = (3.15 " SCLR)/2. 

The user may note that his spacecraft’s altitude j as it 
appears in the plots, is not related in any tijay to actual orbit 
altitude. This is because the primary reason for orbit plots 
is for visualization of orientation. Orbit radius is, however, 
available in common as the variable RTHET in the operations 
block. Therefore, if the user cares to consider the scaling 
involved, he may write operations block logic to relate SCLR 
to actual orbit radius* 

TRUEAN is the true anomaly at the orbit point being de- 
fined for plotting (degrees from periapsis passage), 

TI>IE is the time at which the orbit point plot is de- 
sired, in hours (required only if TRUEAN is not defined) * 

THIEST is time of periapsis passage, in hours (required 
only if TRUEAN is not defined). 

The remaining ODATA arguments, SELN, TIT, IROTX, IROTY, 
IROTZ, ROTX, ROTY, and ROTZ , are exactly analogous to the identi- 
cally named NDATA arguments (ref Section 4, 3, 4.1), Figure 4-2 
depicts the orbit coordinate system as plotted for ROTX - ROTY = 
ROTZ = 0 , ^ 
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4*3*4*3 Subroutine PLDATA 

Calling sequence: CALL PLDATA (IPLUNT, XPLSN, IPLNA, PLCRVF, 

PLLAbX, PLLABY, PLTITl, PLTIT2, PLXMPF, 
PLYNPF, PLCMB) 

This subroutine is used to define parameters necessary 
to execute the output data blotter segment PLOT* Refer to Ap- 
pendix D, p D-32 for argument definitions. 


4.3.5 Direct Irradiation Subroutines 

The direct irradiation subroutines are used to spa- 
tially locate the spacecraft relative to energy sources. The 
various calls give the user the option of locating his space- 
craft using classical orbit parameters, with a modified sun- 
referenced set of orbit parameters, with look angles, or with 
trajectory tape parameters. Subroutines are also available 
for defining spacecraft orientation and spin rate. 

4.3.5. 1 Subroutine ORBITI 

Calling sequence: CALL ORBITI (PNAME, ALAN, APER, OINC, TIMEST, 

HP, HA, StJNRA, SUNDEC, STRRA, STRDEC) 


or : 

CALL ORBITI (PNAME, ALAN, APER, OINC, TIMEST, 
HP, ECC, SUNRA, SONDEC, STRRA, STRDEC) 
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This subroutine defines an orbit using classic orbit 
parameters and locates the sun in the same celestial coordinate 
system referenced to the Vernal Equinox (reference Figures 
4-3 and 4-4). 

In the case of a star-oriented spacecraft, the star is 
located in the celestial coordinate system, in the same manner 
as the sun. 



ALAN - Longitude of ascending 
node measured from 
axis to line of nodes; 
positive toward 

APER - Argument of perifocus. 

measured in orbit Xq^Yq 
plane in direction of S/C 
motion from ascending node 
to per laps is 


HP - Altitude at per laps is 

OINC - Orbit inclination (angle 
between plane and 

orbit plane as seen from 
ascending node; 0. < OINC < 180 
(OINC >90*^ for retrograde 
orbits) 


Figure 4-3 Orbit Definition in a Celestial Coordinate System 
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Equinox 


SDNKA, STEM - Right ascension SUKDEC, STRDEG - Declination of 

of sun/star; measured in X^-Yc sun/s tar j positive from X^-Yc 

plane from Xc axis; positive plane toward Z„; -90 < DEC ^90 

toward Y^ axis; 0. ^ M^ 360 ~ 


Figure 4-4 Sim and Star Locations in Celestial Coordinate System 


PHAME is a Hollerith ciame used as a flag to direct the 
definition of the planet-dependent parameters. The allox^able PNAME 
options are; 3HMER, 3HVEN, SHEAR, 3HM00, 3HMAR, 3HJUP, 3HSAT, 3^P, 
3HURA, and 3HSUH. These names serve to define the following vari- 
bles which are set by the ORBITl or ORBIT 2 call. If the User wants 
to change any of the variables they must be redefined to the new values 
after one of the ORBIT Subroutine Calls in the OPERATIONS DATA Block. 


PEAD 

planet radius 

I 

o 

solar constant at the average planet-sun 
distance 

PALB 

planet albedo value (surface solar re- 
flectance) 

iros 

infrared emissive power at planet 
surface^ dark side 

WSS 

infrared emissive power at planet sur- 
face 5 subsolar point 

grav 

acceleration of gravity at planet surface 

The values 

obtained from the different planet name 


arguments are tabulated in Table 4-1. Note that the values 
tabiilated are in metric units. The values stored in core, 
however, are in the TRASYS base units system, that is, length 
in feet, time in hours, energy in British thermal units. If 
the user desires to manipulate these quantities using his omi 
operations block FORTRAN code, he would expect them to be in the 
ft - hour - Btu units . 

Note that only Mercury and the Earth's moon are treated 
as bodies with nonuniform surface temperatures. Tiis is correct 
for airless, slow-rotating planets. For these too bodies, the 
emissive power is considered everyi^here constant on the dark 
side. On the sunlit side, the emissive power reduces from the 
subsolar value to the darkside value at the terminator, ac'ord- 
ing to a cosine law. 

The user is cautioned that his results using PNAME = 
3HMER may be extremely misleading. This planet's eccentric 
orbit, plus its nearness to the sun, results in a solar constant 
variation of from approximately 6 to over 10 Earth "suns" during 
the Mercury year. Corresponding variations in the subsolar 
emissive power occur. The recommended procedure for PNAME = 
3HMER is for the user to properly define SOL and WSS according 
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Table Stored Planet Property Values 


Planet 

Planet 

Radius 

(km)® (ft) 


Albedo 

Solar Constant 
at Mean 

Planet Distance 
fw/m^)^ (B/Ft^-hr) 

Darks id e 
Emissive Power 

(w/m^)® (B/ft^-hr) 

Sub solar 
Emissive Power 

^ (B/ ft^-hr) 

Planet 

Gravitational 

Constant 

fm/s^)^fft/ s^) 

Mercury 

2485. (8.153 E06) 

0.058 

8920. 

(2830) 

0. (0.) 

8402. 

(2666.) 

3.513 

(11.49) 

Venus 

6199. (20.34 

E06) 

0.76 

2570. 

(815.5) 

154.2 (48.93) 

154.2 

(48.93) 

8,462 

(24.68) 

Earth 

6370. (20.90 

E06) 

0.30 

1352. 

(429) 

236.6 (75.08) 

236.6 

(75.08) 

9.844 

(32.20) 

Moon 

1738. ( 5.702 E06) 

0.047 

1352. 

(429) 

6.5 (2.060) 

1288. 

(408.7) 

1.622 

(5.306) 

Mars 

3314. (10.87 

E06) 

0.148 

577.3 

(183.2) 

123.0 (39.03) 

123.0 

(39.03) 

3.921 

(12.83) 

Jupiter 

69885. (229.3 

E06) 

0.51 

49.6 

(15.74) 

6.1 (1.936) 

6.1 

(1.936) 

26.04 

(85.18) 

Saturn 

57515. (188.7 

E06) 

0,50 

14.7 

(4.66) 

1.8 (.5711) 

1.8 

(.5711) 

11.17 

(36.54) 

Uranus 

25482. (83.61 

E06) 

0.66 

3.65 

(1.16) 

.31 (.0983) 

.31 

(.0983) 

11.52 

(37.68) 

Neptune 

24850. (81.53 

EOS) 

0.62 

1.48 

(.47) 

.14 (.0444) 

.14 

(.0444) 

8.977 

(29.36) 

Sun 

698500. (2291. 

E06) 


— 


6.262 X 10^ 

6.262 X 

10^ 

273.8 

(895.6) 


^Values stored in program are in ft* 

b 2 2 2 

Referenced to 1352 w/m (429 Btu/hr-ft ) at 1 AU. Values stored in program are in Btu/ft -hr. 

Values stored in program are in Btu/hr-ft^. 

d 2 

Values stored in program are in ft/s , 


to his knowledge of the planet- sun distance* This is done us- 
ing two fortran statements ir.'mediateiy following his CRBITl 
call# This same technique is available^ of course, whenever the 
user desires to change WDS, WSS, or SOL to values other than 
the built-in nominals* The user^s values will hold until another 
ORBIT call is encountered* 

ALAN, APER, OINC, HP, and HA are the longitude of the 
ascending node, argument of perifocus, orbit inclination, and 
periapsis and apo apsis altitudes. These are the five parameters 
necessary to define an orbit in the celestial coordinate system* 
The alternate GRBITl call allows the input of eccentricity (EGG) 
in lieu of apoapsis altitude* TIMEST is the time of periapsis 
passage, in hours. 

The angular measurement arguments are in decimal de- 
grees of arc. The altitudes must be specified in feet. Note 
that FORTRAN allows arithmetic operations within argument lists; 
thus the following ORBITl call might be used where HP is known 
to be 150 nautical miles : 

CALL ORBITl (3HEAR, 32., 90., 22.5., 0,, 6080. 

*150#, .94, -41., 18., 0., 0.) 

SUNRA and SUNLEC are the right ascension and declina- 
tion of the sun, respectively, input in decimal degrees of arc 
(See Figure 4-4) * 

STRRA and STRDEC are the right ascension and declina- 
tion, respectively, of a star for a star-oriented mission (see 
Figure 4-4). Zero or dummy arguments are passed for non-star- 
oriented missions. 

For heliocentric orbits, (PNAHE = 3HSUN) ALAN, APER, 
OINC, SUNRA, and SUNDEC have no meaning and are passed as aero 
or dummy arguments. 

4.3. 5. 2 Subroutine QRBXT2 

Galling sequences: GALL 0RBIT2 (PNAME, CIGMA, BETA, GIGMAS, 

betas, riMEST, HP, HA) 

or: 

CALL 0RBIT2 (PNAME, CIGMA, BETA, GIGMAS, 
BETAS, TIMEST, HP, EGG) 


This subroutine defines an orbit using sun- referenced 
parameters in the orbit coordinate system. The orbit coordinate 
system has its X and Y axes in the orbit plane and its Z axis 
completes a right-handed set. The spacecraft travels from X 
towards Y* 

PNAME functions identically with ORBITl. 

CIGMA and BETA locate the solar vector in the orbit co- 
ordinate system (see Figure 4-5). ClGMAS and BETAS locate a 
star in the orbit coordinate system (see Figure 4-5) . Again, 
these arguments are zero or dummy for non-star-oriented missions. 

For heliocentric orbits, (PNAME = 3HSUN) 0RBIT2 is not 
applicable. 

4.3. 5.3 Subroutine ORIENT 


Calling sequence: CALL ORIENT (TYPE, IROTX, IROTY, IR0T2, 

ROTX, ROTY, R0T2) 

This subroutine is used to define the spacecraft orienta- 
tion relative to space- environment heat sources. Orientation is 
accomplished by relating the spacecraft central coordinate system 
to a vehicle coordinate system (VCS) that remains fixed, relative 
to a heat source or a star reference. 

TYPE is a Hollerith name used as a flag to define orienta- 
tion of the VCS. Allowable options for TYPE are 4HPLAN., 3HSUN, 

4HSTAR, or 4HTAPE. Figure 4-6 depicts the VCS relationship to the 
heat sources, star reference, and orbit coordinate system for the 
PLAN, SUN, and STAR options. The X^-axis points to the planet, sun, 

or star and the Z -axis is in the same half-space as the Z -axis. 

The Y^-axis lies in the orbital plane and completes the right-handed 

set. The TAPE option allows orientation to be defined from a tra- 
jectory tape. 

An ambiguity exists for the sun or star oriented options when the 
sun or star vector is parallel to the Z^-axis. In this case, the Y-- 
axis is defined to be in the direction of the velocity vector* 

IROTX, IROTY, IROTZ, ROTX, ROTY, and ROTZ are the rotation 
parameters necessary to locate the spacecraft CCS relative to the 
VCS and, hence, the heat source (s). ROTX is the rotation angle to 
rotate the VCS into the CCS; it rotates about X -axis, Y toward Z 

V V V 

positive. ROTY is. the same as ROTX* except about the Y -axis; ROTZ 
is the same as ROTX, except about the Z -axis, X toward Y positive. 

V V V 
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j 

. ’ 

GIGMAS - Same as CIGMAu except to star vector projection i 

BETA - Angle from Zq axis to sun vector 
0 < BETA ^180 

BETAS - Same as BETA, except to star vector • j 

Figure 4-5 Orbit Definition in Orbit Coordinate System i 

1 




CIGMA - Angle from Xq axis to sun vector projection in 
Xq - Yq plane. Measured CCW as seen from Zq 
axis (in direction of S/C motion) . 

0. < CIGMA < 360 
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TYPE = 3HSUN TYPE = 4HSTAR 



Orientation Example 

(CCS Z-axis locked to sun) : 

TYPE = 3HSUT" 

IROTX = 1 
IROTY = 2 

IROTZ =‘3 Rotates VGS into CCS, -270° 

ROTX =0. about Y axis 

ROTY = -270. 

ROTZ = 900 Itotates 90° about Z axis 



Figure 4-8 Vehicle Orientation with Subroutine ORIENT 


IROTX, IROTY, and IROTZ control the order in which the rotations are 
performed. Integers 1, 2 , and 3 are the allowed options. For ex- 
ample, IROTX = 1, IROTZ = 2, and IROTY = 3 results in rotation first 
about X , then about Z , and then about Y . 

V V V 

4.3. 5.4 Subroutines DIDTI and DIDTlS 

Calling sequences: CALL DIDTI (DiNOSH, DIACC, DIACCS, TRUEAN, 

NSPFF, TIMEPR, DIPNCH, ISFAC) | 

or: 

CALL DIDTIS (TRUEAN, NSPFF, TIMEPR, DIPNCH, ISFAC) | 

These subroutines allow the user to define the form 
factor and shadowing accuracy parameters used in his direct ir- 
radiation calculations, Additionally, these routines can be 
used to update the spacecraft position in orbit by defining true 
anomaly (reference Figure 4-7). True anomaly can be defined 
directly or by defining a current time, 

DINOSH is a shadow/ no shadow flag for direct irradia- 
tion calculations. DINOSH = 4HSHAD retains shadowing calcula- 
tions. DINOSH = 4HNOSH bypasses shadowing calculations. 

DIACG is the element selection accuracy factor for node 
planet form factor calculations. Its function is similar to 
FFACC in form factor calculations and its default value is 0.25. 

(ref para 4. 3, 3.1 and Appendix B) . 

DiACCS is the eleme.nt selection accuracy factor for 
shado^sdng calculations (not applicable when DINOSH - 4HN0SH) . 

Its function is similar to FFACCS in form factor calculations 
and its default value is 0.1. (ref para 4. 3*3.1 and Appendix B) . 

TRUEAN is the true anomaly of the spacecraft measured 
in decimal degrees of arc from periapsis passage in direction 
of spacecraft motion* 

TIMEPR is used to define true anomaly in terms of time; 

TIMEPR is current time, in hours. If TIMEPR is defined, TRUEAN 
in decimal degrees is returned to the operations block in common. 

If TRUEAN is defined, current time is returned to the operations 
block under the variable nam TIMEPR. 

NSPFF specifies a step number within which a planetary 
flux calculation was made. If the FORTRAN statement: PLTYPE * 
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Figur’d 4-7 Definition of True Anomaly and Shadow Entry/Esnit Points 


6HPLSAVE appears prior to this calculation, the form factor matrix 
from the spacecraft to planet will be stored out of core under step 
NSPFP. If this form factor matrix is valid for additional orbit 
points (i*®- circular orbit, planet oriented), the FORTRAN state- 
ment PLTYPE = 6HPLREAD is made in the first step subsequent to 
NSPFP. This will result in the planet form factor calculations 
being bypassed for the subsequent steps, with a corresponding sav- 
ing in computer time. To reduce computation time for Restarts the 
Form Factor Matrix from the Spacecraft to the Planet is also saved 
on the RSO tape for circular Orbit-Planet oriented cases. 
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DIPNCH is the flag for punching direct irradiation data in 
the flux data block format. Options are 3HPUN, 2HN0, and 4HTAPE, 

ISFAC is the flag that controls whether or not flux shadon-7 
factors are written to the RSO tape for subsequent printing in the 
DIRECT Incident Link for restart runs. Enter NO to inhibit writing 
the shadow , factors on the Univac version of TRASVS. Enter YES to 
write the shadow factors on the CDC version. 

Subroutine DIDTIS is a short form version of DIDTl to be 
used when the user does not desire to specify his accuracy and shadow/ 
no shadow flag. See Appendix D for DIDTl and DIDTIS argument default 
values, 

4. 3. 5. 5 Subroutines DIDT2 and DIDT2S 

Calling sequences: CALL DIDT2 (DINOSH, DIACC, DIACCS, NSPFF, SUNCL, 

SDNCO, PLCL, PLCO, TIMPEPR, ALT, DIPNCH, ISFAC) | 

or; * 

CALL DIDT2S (NSPFF, SUNCL, SUNCO, PLCL, 

PLCO, TMPR, ALT, DIPNCH, ISFAC) | 

These subroutines are identical in function to DIDTl 
and DIDTIS in that they define the shadowing and accuracy param- 
eters to be used in the subsequent direct flux segment execu- 
tion, as well as furnish the parameters necessary to define the 
spacecraft's spatial relation with the sun and planet heat sources* 

The arguments DINOSH, DIACC, DIACGS, NSPFF AND ISFAC are 
exactly as discussed in paragraph 4. 3*5*4 and tabulated in Ap- 
pendix D. 

SUNCL, SUNCO, PLCL, and PLCO are the clock and cone 
angles needed to define the direction of the sun and planet posi- 
tion vectors in vehicle coordinate system 3-space. Figure 4-8 
shows hox^ these parameters are defined. Their input units are 
decimal degrees of arc. 

ALT is the spacecraft altitude, above the planet, this 
argument must be input in feet. 

It should be noted that a DIDT2 call is not sufficient 
to define all the variables needed for a direct irradiation seg- 
ment execution. In general, an ORBITl or ORBITZ call must be 
made, or the variables PRAD, SOL, PALB, WDS, and WSS (ref para 
4. 3. 5.1) must be defined individually in operations block FORTRAN 
statements- The call to ORBITl or 0RBIT2 need only define PNAMH. 

The remaining arguments may be dummys. 

The user should also be aware that spacecraft spin, as 
defined by subroutine SPIN, is not applicable xvhen DIDT2 or DIDT2S 
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are called, since DIDT2 and DTDT2S directly define spacecraft 
orientation as well as position in space. 

4. 3, 5,6 Snbroutine SPIN 

Calling sequence; CALL SPIN (CLOCK, CONE, RATE, TRUANS, SPNTM) 


*If subroutine ORIENT is not called prior to DIDT2 or DIDT2S, the 
vcs and ccs coincide. This is the recommended mode of use. "STAR" 
is not allowed as an orient type when using DIDT2 or DIDT2S. r 
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This subroutine is used to define spacecraft spin. The 
arguments CLOCK and CONE define the spin axis with reference to the 
central coordinate system. RATE defines the spacecraft spin rate 
about the spin axis in revolutions per hour. Figure 4-9 illustrates 
the clock and cone angles, and the algebraic sign convention used 
with RATE. 


The time spin begins is defined through TRUANS or SPNTM. 

If the user knows the time his spin begins, he specifies it directly 
as SPNTM. If he knows the true anomaly where it begins he specifies 
TRUANS and passes zero for SPNM. 

Spacecraft spin computations are done on the basis of the 
folloxjing: the spacecraft is assumed to be in the orientation de- 

fined by the last call to subroutine ORIENT at SPNTM. At any sub- 
sequent points in time, the spacecraft is reoriented, presuming a 
constant spin-rate, about the SPIN-defined spin axis, over the time 
elapsed since SPNTM. 

The user should note a restriction when using subroutine 
spin in conjunction with the ORBGEN card: The only allowable ORBGEN 

options, after a call to SPIN, are PLAN and NOPL. This is because 
particular orientati ras are assumed by the CIRP and INER options 
that are obviously violated by spacecraft spin. 

4. 3. 5. 7 Subroutine DICCMP 

Calling sequence: CALL DIGOMP (ISOLFL, lALBFL , IPLAFL) 

This subroutine allows the user to define the logic used 
in a subsequent DICAL execution. The choice of computing, stuffing 
from another step, or zeroing out individual solar, albedo, and 
planetary fluxes is available. See Appendix D, p U-8, for argu- 
ment definitions. 

4. 3. 5. 8 Subroutines DIITP and DITTPS 

Calling sequence: CALL DITTP (TIME, ITYPE , PLANAM , IDWDN, FIDEN, 

NTIM, NTYPE, NCLPL, NCOPL, NCLS, NCOS, NRAD, 

NITOR, ALTMF, IBOD, DIPNCH) 

or: CALL DITTPS (TIME, ITYPE) 

These subroutines allo:<r the user to define his mission by 
reading trajectory tapes of the attitude timeline variety. The 
pertinent data are read from the tape and placed in storage for use 
^by the DICAL segment through an internal call to DIDT2. 

Subroutine DITTP allows the user to define the trajec- 
tory tape format, identify the proper file on multifile tapes , 
define the attitude parameters for his first compute point, and 
position the tape for reading subsequent points. Subsequent 



Note : Spin axis coordinates illustrated for the 

case clock - 180 j cone = 90 

Figure 4-9 Spacearaft Spin Definition 


points are read using DITTPS, which presumes that the tape is pre- 
viously positioned to the correct file, and a call to DITTPS re- 
sults in repeated reads of trajectory tape records until a time 
value equal to TIME is encountered. If ITYPE is defined (as an 
integer data value), repeated reads are made until TIME is en- 
countered, then reading continues until a special event identifier 



equal to ITYPE is encountered. Kote that this tape reading 
method precludes calling for a time value less than the time 
argument used in a previous DITTP or DITTPS call. 

Figure 4-10 is an operations data block segment that 
generates direct irradiation for three time points, using a tra- 
jectory tape. In Step 2, the trajectory tape is positioned to 
a file named ZLVl and the data are read at TIME = 10.0 hours, which 
is not a special event point. The planet involved is Earth, 
flux output is punched, and the spacecraft altitude data on the 
tape are in nautical miles (ALTMF = 6080.). Trajectory tape for- 
mat information is as follows: 

a) Tape records are 58 words long (NWOR = 58) , 

b) Tape is for 1 body (IBOD =0). 

c) File identification is found in word 1 of tape records 
(IDWDN = 1) , 

d) Time is found in word 3 of tape records (MTIM = 3) , 

e) Special event identifier is found in word 5 of tape records 
(NTYPE = 5) . 

f) Planet center-to-spacecraft distance is found in word 13 of tape 
records (NRAD = 13 ) . 

g) Clock angle-to-planet vector is found in word 9, 

(NCLPL = 9) . 

h) Cone angle-to-planet vector is found in word 10, 

(NCOPL = 10) , 

i) Clock angle-to-sun vector is found in word 11, 

(NCLS = 11) . 

j) Cone angle-to-sun vector is found in word 12, 

(NCOS =12). 

Step 2 reads trajectory tape" information at time = 

10.5 hours, which is not a special event. Step 3 reads trajec- 
tory tape information at a special event of type 2, which occurs 
just subsequent to 11 . 0 hours . 

4. 3. 5. 9 Subroutine DRDATA 

Calling sequences: CALL DRDATA (NSTPDI, DIAGCS) 

This subroutine defines the parameters necessary to exe- 
cute the DRCAL program segment. NSTPDI is the step number that 
DRCAL will use for retrieving the direct solar fluxes computed by DICAL 
DRCAL computes the solar irradiation resulting from specular bounces, 
adds this to the direct solar fluxes and stores the results under the 
current step number, DIAGCS is the shadowing accuracy parameter. 
(Reference DIDTl) NSTPDI defaults to the current step number and 
DIAGCS defaluts to 0.1. Default values are used by DRCAL if no 
call is made to DRDATA. 
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HEADER OPERATIONS DATA 
STEP 1 

CALL BUILDG (ALLELIC, 0) 

L FFGAL 

L GBCAL 
STEF 2 

CALL DITTP(10.0,0,3HEAR,1,4HZLV1,3,5,9,10,11,12,13,58,6080.,0, 

13HPUN) 

L niCAL 
STKP 3 

CALL D1TTPS(10.5,0) 

L DICAL 
STEP 4 

CALL DITTPS(11.0,2) 

L DICAL 

Figure 4-10 Trajectory Tape Operations Example 
4.3,6 Radiation Interchange Subroutines 

4. 3.6.1 Subroutine GBDATA 

Calling sequence: CALL GBDATA (GBWBND, 6HNFIGFF, NFFTYP) 

This subroutine defines the parameters necessary prior to 
executing the GBCAL segment to obtain a grey-body factor matrix. 

Argument GBWBND (Options: 3HSOL, 2HIR, 4HB0TH) defines the 

energy waveband — solar, infrared, or both — that xd.ll be used in grey- 
body factor calculation. 

Argument WFIGFF is the model name under x-jhich the form factor 
matrix desired for gray body calculations is stored. Defaults to 
current model name. 

Argument NFFTYP is the type of form factors stored under 
NFIGFF. FF for ordinary form factors, CM. for combined form factors, 
and RB for image factors. 

4. 3. 6. 2 Approximate Radiant Interchange Factors - Snbrnuftne GRAPpy 

A routine is available in the processor library that computes 
diffuse-grey-body interchange factors according to the first-order 
approximation: 

= PROPI*PROPJ*F . . 

3-J 
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whe re 


PROPI and PROPJ are the diffuse surface properties, solar 
absorptivity or infrared emissivity; is the approximate radiant 

interchange factor between surfaces i and j; is the form factor. 

This equation is, of course, exact for a black enclosure (PROPI = 
PROPJ = 1 for all i, j). 

A call to subroutine GBAPRX in lieu of executing the GBCAL 
segment t^ill generate the approximate grey-body factor data and store 
them in the same manner as GBCAL. There is a significant saving in 
computer time when the problem size is 200 nodes or greater. 


Calling sequence: CALL GBAPRX (GBITOND, 6HNFIGFF, NFFTYP) 

This subroutine calculates grey -body radiant interchange 
factors u-'.ing the approximate relationship described above and 
stores the results in data storage under the current configuration 
name : 


Arsument 

Name 

Description 

Op tions 

Default 

G5WBND 


Waveband definition 
name 

2HIR, 3ES0L 
4HBOTH 

4HB0TH 

dFIGFF 


Configuration name for 
form factor access 


Current Config- 
Name 

KFFTYP 


Form factor type to 
be used in GB calcu- 
lations 

2HFF,2HCM 

Last type cal- 
culated under 
NFIGFF 

Note: Input 

zero for default action. 



4. 3. 6. 3 

Subroutine RKDATA 



Calling 

sequence: CALL RKDATA (NFIGGB, 

RKPNCH, RKMIN, 

IRKCN, RKSP, 


IRKNSP, SIGMA, RKAMPF, RKTAPE, 
NFIGCO) 


This subroutine defines the parameters necessary prior to 
executing the RKCAL program segment to obtain radiation conductors 
(RADKs) in thermal analyzer format. 
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Argumeat NFIGGB identifies the configuration name under which 
the grey-body factor matrix corresponding to the desired radiation con 
ductors was computed. 

Argument RKPNCH (Options: 3HPUN, 2HN0) is the punch/no punch 
flag for radiation conductors on BCD card format. 

Argument RK>fEN defines the lower limit of the radiation con- 
ductor values that will be punched or put on BCD tape, RKMIN is 
defined as follows for a valid radiation conductor: 

F. ./^ * < RK^ilN 

ij 1 

where 


F. . is the grey-body factor from node i to j , 
^ J 

^ . is the infrared emifctance of node i, 

1 


Argument IRKCN is the initial radiation conductor identifica- 
tion number* The radiation conductors are numbered consecutively from 
IRKCN, 


Arguments RKSP and IRKNSP provide the information to define 
radiation conductors to space for problems that do not form a complete 
enclosure RKSP (Options: 5HSPACE, 2HN0) is the flag for calculation 

of radiation conductors to space* When RKSP = 5HSPACE, radiation con- 
ductors to space for node i are computed according to 


F. =£. - > F_ 

i-space I ij 

j 

for an N-node problem* IROSP is the user -defined identification number 
for his space node* 

SIG>JA and RKAMPF are available for the user to obtain unit 
agreement between his radiation model and thermal analyzer model. SIGMA 
is the Stefan -Boltzmann constant that will appear on the radiation con- 
ductor and RECAMPF is an arbitrary multiplication factor available to 
change from the TRASYS standard area units (square feet) to the area 
unit the user desires. If RKAMPF is 1.0, the area unit associated with 
SIGMA must be square feet. 

Argument RKTAPE (Options: 4HTAPE, 2HN0) allows the user to 

write his radiation conductors to his BCD RADK tape (thermal analyzer 
format) . 


REV. 1 
4-30 


Argument NFIGCO is the configuration, name for correspondence 
data access. 

All RKDATA arguments have default values (see Appendix D) so 
that an RKDATA call before an RKCAL execution is not mandatory. 

4 . 3 . 6 . 4 Radiation Condenser - Subroutine RCDATA 


The radiation condenser segment provides the user with two 
methods of radiation model simplification. 

The first of these methods, which is referred to as the 
Multiple Enclosure Simplification Shield (MESS) technique, allows a 
complex radiation enclosure to be modularized into discrete sub- 
enclosures by the assignment of imaginary interface shield nodes. 

Each of these smaller enclosur-:s can be analyzed independently of the 
others, resulting in more efficient use of computers and manpower. 

The second method, referred to as the Effective Radiation Node 
(ERN) technique, is used to reduce the number of radiation couplings 
required to thermally model an enclosure by replacing small conductors 
from each node with a single conductor couple^’ to the enclosure ERN. 

The techniques and their application are described in more 
detail in Appendix F. 


Calling sequence; CALL RCDATA (NFIGGB, EKPNCH, RKMIN, IRKCN, RKSP, 

IRKNSP, SIGMA, RKAMPF, RKTAPE, NFIGCO, RFRAC, 

RTOL, NERN, IPRIME, ISECND) 

This is a user-called subroutine that defines the parameters 
used in RCCAL for the condensation and output of radiation conductors 


(RADKS) . 




Variable 

Description 

Default 

Value 

NFIGGB 

Configuration name for grey-bod\ Cactor 
access 

Current 

name 

config. 

RKPNCH 

Punch/No Punch Flag. Options; 3HPUN, 
2HN0 

3HPUN 


RKMIN 

Minimum Value of /£■ that will result 

in a valid RADK. If NERN is positive 
the RKMIN test is applied to the sum of 
those connections discarded after the 
RFRAC requirement is satisfied. 

0.0001 

REV 


4-31 


Variable 

Description 

Default Value 

IRKCN 

Initial Radiation Conductor Number 

1 

RKSP 

Flag for Calculation of RADKS to Space. 
Options : 5HSPACE, 2HN0 

2HN0 

IRKNSP 

Space Node Number 

32767 

SIGMA 

Stefan-Boltzmann Constant 

1.713E-9 

RKAMPF 

Area Multiplying Factor 

1.0 

RKTAPE 

Flag to write RADKS to BGDOU Tape. 
Options: 4HTAPE, 2HN0 

2HN0 

NPIGCO 

Configuration name for Correspondence 
data access 

Current Gonfig. 
name 

RFRAC 

Significant Radiation Fraction: Ref. 

Appendix F, equation 6. 

None 

RTOL 

Percentage of SLAST (last conductor 
saved to meet RFRAC criterion). Subse^ 
quent conductors are saved if their values 
are greater than RTOL*SLAST. 

.99 

NERN 

Effective Radiation Node (ERN) Number. 
Any negative value will cause the pro- 
gram to print all ERN conductors but 
not punch or write them to tape. 

None 

IPRIME 

Array Name for Array of Primary MESS 
Node Numbers and Special Node Numbers. 

None 

ISECND 

Array Name for Array of Secondary MESS 
Node Numbers 

None 

Restrictions : 


1. 

RCDATA must be called prior to RCCAL execution 
the variables are not defaulted. 

because all of 

2. 

IPRIME and ISECND arrays must be input in the array data block 
to specify MESS node pairs and special nodes. IPRI>E contains 
a list of all primary MESS nodes and all special nodes in that 


order. ISECND contains a list of all secondary MESS nodes in 
a one-to-one correspondence with the primary MESS nodes in 
IPRIME. 
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Absorbed Heat Subroutines 


4*3. 7,1 Subroutirie AQDATA 

Calling sequence: CALL AQDATA (lAQGBI, lAQGBS, RSOLAR, RALB, 

RPLAN) 

This subroutine defines the parameters necessary prior 
to executing the AQCAL program segment to compute absorbed heats. 

lAQGBX (Options CONFN, FZEROI) CONFN is the Hollerith 
configuration name in effect when the appropriate infrared grey- 
body factors were computed. FZEROI is the zero flag for infrared 
absorbed heat. When lAQGBI = 4HZER0, all infrared absorbed fluxes 
will be zero, and no infrared grey-body factor matrix is needed 
for AQCAL execution. 

lAQGBS (Options CONFN, FZEROS) is analogous to lAQGBI 
for the solar waveband, 

RSOLAR is a solar-heat rate multiplying factor (defaults 
to 1.0). NOTE: Albedo heat rates are multiplied by R solar also. 

RALB is an albedo-heat-rate multiplying factor (defaults 

to 1.0) . 

EIPLAN is a plane tary- heat- rate multiplying factor 
(defaults to 1.0). 

Configuration name arguments will default to the current 
configuration name, so that an AQDATA call is not required if all 
necessary data are in storage under the current configuration name* 

Variable AQPRNT controls whether or not a detailed printout 
of absorbed heat data is obtained. Detailed prints consist of the 
direct and reflected components of the absorbed solar, albedo and 
planetary heat rates with applicable correspondence applied. To 
activate this print, enter the FORTRAN statement AQPRNT - YES prior 
to any ORBGEN card or L AQCAL card* 

4. 3. 7. 2 Subroutine STFAQ 

Calling sequence: CALL STAFQ (TRUEAN, TIMEPR, NSTP) 

This subroutine stuffs values of absorbed heat and/or 
direct flux computed in a previously executed step into out-of- 
core storage for the current step. It also stores time for the 
current step, defined either directly or from true anomaly. 

The argument NSTP is the step number from which the 
desired absorbed heat values will be obtained. 
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The geometry, as defined bv BUILDC and ADD calls, in effect 
at the time any STFAQ call is made must agree exactly with that in 
effect when step NSTF was executed- 

4, 3. 7-3 Subroutine QODATA 

Calling sequence: CALL QODATA (NSARRY, NTMARY, QOTAPE, QOPNCE, 

QOAMPF, QOFMPF, QOTMPF, QOTYPE) 

This subroutine defines the parameters necessary to allow 
absorbed heat data in thermal analyzer format to be generated in a 
subsequent QOCAL execution- 

Argument NSARRY is the name of an array containing the 
previously executed step numbers where the desired absorbed -heat 
data can be found in storage. The Step Numbers in the array do not 
have to be in numerical or chronological order for the program to 
work correctly. Unless NSARRY = 3HALL, this array must be entered 
in the array data block and must be dimensioned to agree exactly 
with the number of valid step numbers it contains. The user is 
referred to Section 3 *3. 2-2 for examples of ways this array may be 
defined- If the 3HALL option is used, all absorbed heat data com- 
puted since the last call to QOINIT will be output. 

Argument NTMARY is the thermal analyzer array number the 
user desires for his time array when Q vs time tables are being 
generated. The Q arrays generated Xi7ill be number consecutively 
from NTMARY+1. 

Arguments QOTAPE and QOPNCH are flags to control the form 
of Q table output. Options are 4HTAPE, 2HN0 for write/no write to 
BCD tape, and 3HPUN, 2UN0 foir punch/no punch control - 

Arguments QOAMJ^F, QOFMPF and QOTMPF are the multiplying 
factors for area, energy, and time, respectively. The default 
value, of 1.0 result in time in hours, area in square feet, and 
energy in Btu/hr, 

Argument QOTYPE controls the type of output obtained. 

3HTAB results in Q vs time tables ; 2HAV results in an integrated 
average Q for the time period defined by NSARRY- 

4-3-7. 4 Subroutine QOINIT 

Calling sequence: CALL QOINIT 

This subroutine rewinds the file containing the absorbed 
Q data, thus providing user control of the number of time points 
obtained with NSARRY = SHALL. 


4,3.8 


Data Modiflcatioa Routines 


I 


A series of routines are available that enable the user to 
change certain types of data from the operations data block. This 
provides a convenient way to perform many types of parametric studies 
without the necessity of making multiple runs and error-prone changes 
to the surface data. 

The series of routines allows the following node properties 
to be changed: 

a) Area; 

b) Diffuse infrared emissivity and/or solar absorptivity; 

c) Specular infrared and/or solar reflectivity; 

d) Infrared and/or solar transmissivities; 

e) SHADE/BSHADE flags. 

Calling sequences are designed so that the properties may be 
changed for one or all active nodes with one call. The use and 
function of these routines is explaned in the following sections, 

4.3*3#1 Subroutine MODAR 

Calling Sequence: CALL MODAR (ND, AR) 

This subroutine changes the area of a designated node 
or the area of all currently active nodes by use of a multiplier. 


Argument Name 

Description 

Options 

Default 

ND 

Node Number 
Designator 

a) 

Any Active 
Node Number 
(Integer) . 

None 



b) 

3HALL 


AR 

Desired Value 
for Area 

a) 

Floating- 
Point Data 
Value 

None 



b) 

Area Multi- 





plier^ (SHALL 
Option Only) 

"1 » r- -1 


Note : 1- When ND " SHALL^ all active node areas are modified 

according to AREA - AREA*AK, 


Restriction: Call not valid pricer to geometry definition 

through calls to BUILDC and ADD. 
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4. 3, 8. 2 Subroutine MODPR 


Calling sequence: CALL MODPR (ND, ALPHA, EMISS) 

This subroutine modifies the diffuse infrared emissivity 
and/or the diffuse solar absorptivity of a designated node. 


Argument Name 

Description 

Options 

Defaul t 

. ND 

Node Number 
Designator 

Any Active 
Node Number 

None 

ALPHA 

Diffuse Solar 
Absorptivity- 

a) 0. 4 DV4 1. 

b) DV < 0. 

None 

EMISS 

Diffuse IR 
Emissivity 

a) 0. < DV 4 1. 

None 


Note : 1. If ALPHA 0. or EMISS 0,, current values are not 

changed . 

Restriction: Call not valid prior to geometry definition 

through calls to BUILDC and ADD. 

4. 3. 8.3 Subroutine MODTR 

Calling sequence: CALL MODTR (ISR, TRANS, IRANI) 

This subroutine modifies the solar and/or infrared trans 
raissivity of a designated Surface. 


Argument Name 

Description 

Options 

Default 

ISR 

Surface Number 

Any Active 

None 


Designator 

Surface Number 


TRANS 

Solar Trans“ 

a) 

0. •< DV ^ 1. 

None 


missLvity 

b) 

DV< 0. 


IRANI 

IR Transmissiv- 

a) 

m 1. 

None 


ity 

b) 

DV< 0. 



Note : 1, IRANI and TRANS values less than zero are used to 

correctly account for the transmissivity of double- 
faced surfaces, (Reference Section 3, 3. 3. 8) 

2, Transmissivity changes affect the entire surface. 

Restriction: Call not valid prior to geometry definition through 

calls to BUILDC and ADD. 
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4. 3*8*4 Subroutine MOPPRS 


Calling sequence: CALL MODPRS (ND, SPRS^ SPRI) 

This subroutine modifies the solar and/or infrared 
specular reflectivity of a designated node. 


Arc^uraent Name 

Description 

Options 

Default 

ND 

Node Number 

Any Active 

None 


Designator 

Node Number 


SPRS 

Specular Reflec- 

a) 

0. DV^ 1. 

None 


tivity, Solar 

b) 

DV < 0 , ^ 


SPRI 

Specular Reflec- 

a) 

0. < DV < 1- 

None 


tivity, Infrared 


1 




b) 

DV ^ 0. 



Kotes : 1. If SPRI-C 0* or SPRS < 0*, current values are not changed. 

Res trictions: 1, This call is applicable only to nodes defined as 

specular reflectors in the surface data block. 

2. Call not valid prior to geometry definition through 
calls to BUILDC and ADD. 

4* 3*8*5 Subroutine MODSHD 


Calling sequence: CALL MODSHD SHADE , BSHADE) 

This subroutine modifies the SHADE /BSHADE flags for a 
designated surface. 


Argument Name 

Description 

Option 

Default 

ISR 

Surface Number 
Designator 

Any Active 
Surface Number 

None 

SHADE 

Can Shade Flag 

FE, DI, BOTH, 

NO, 0^ 

None 

BSHADE 

Can Be Shaded 
Flag 

FF, DI, BOTH, 
NO, 0^ 

None 
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Note: 1. If SHADE or BSHADE data values are zero, their values 

are not changed. 

2. Shade flag changes affect the entix^e surface. 

Restrictions: 1. Call not valid prior to geometry definition 

through calls to BUILDC and ADD. 

2* Call not applicable to shadower-only surfaces. 

4. 3. 8.6 Subroutine NODDAT 

Calling sequences: GALL NODDAT 

After a series of calls to the **MOD** routines, it might 
be desirable to obtain a printout of the nodal properties as a 
check. NODDAT provides this feature. A call to NODDAT anyx'jhere 
in the operations data block will produce a printout of the 
optical properties assigned to each currently active node. 


4.3.9 Restart Control Subroutines 


Two routines are available in the processor library for 
use in stopping or resuming the reading of a Permanent Restart Input 
(RSI) tape during a restart run. The judicious use of RSTOFF and 
RSTON allows the user to insert new segment calls, delete segment 
calls or redo any part of the operations data. (Refer to Section 3. 3. 9. 6) 

4. 3. 9.1 Subroutine RSTOFF 

Calling sequence: GALL RSTOFF 

A call to this routine stops the reading of data from the 
RSI file and initiates the processing of the operation data logic 
following the call. 

4.3. 9*2 Subroutine RSTON 


A call to this routine stops processing of operations 
data logic and causes the resumption of the reading of data from 
the RSI file. 
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4.3.10 


Planet Surface Subroutines 


Subroutines SURFP, DIDT3, and DIDT3S provide a package 
that allows the user to locate his configuration on the surface 
of a rotating planet. Solar flux histories for a planetary day 
may then be computed by updating time of day and executing the 
DICAL segment. Planet ro'-.ation data and above atmosphere solar 
constants are provided internally for Earth, Mars, and the moon. 

The user controls atmospheric attenuation of the solar flux through 
a program variable called the atmospheric extinction factor. DICAL 
automatically avoids planetary albedo and infrared flux calcula- 
tions for this option. A ground plane of arbitrary size and appro- 
priate optical properties should be included in the configuration. 
Solar ref -tion from this plane is analogous to albedo flux, and 
infrared energy interchange calculations with this plane in the 
thermal analyzer will account for the infrared environment. 

4.3.10.1 Subroutine SDRFP 


Calling sequence: CAL SURFP (PNAME, ALAT, SUNLAT, AEX) 

This subroutine spatially locates the sun vector rel- 
ative to the configuration on the rotating planet, defii .s 
planet rotation rate, and sets variables used to compute the 
solar ’’constant" as attenuated by the atmosphere as a function 
of the time of day. A change in any of the SURFP arguments must 
be accomplished through a call to SURFP. 

PJTAME (options 3HEAR, 3HMAR, 3HM00) defines the follow- 
ing variables : 

SOLO - solar constant outside the atmosphere , Btu/hr ft^ 
(429.0 for Earth and moon, 183.2 for Mars) 

PER - Rotation period of planet, hours 

If a value other than the built in nominal for SOLO 
is desired, SOLO is redefined as desired in the operations data 
block subsequent to the SURFP call. 

ALAT is the latitude of the configuration on the planet, 
degrees of arc. 

SUNLAT is the solar declination in degrees of arc. If 
PNAME = 3HEAR, SUNLAT must be a day of year (1. < SUNLAT < 365.) 
so that solar declination can be computed from an ephemeris equa- 
tion . 
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AEX is the atmospheric extinction factor that appears 
in the equation: 

SOL = SOLO/EXP (AEX/COS(PHI)) 

where: SOL - attenuated solar "constant” 

SOLO - solar constant outside atmosphere 
PHI - angl from local vertical to sun vector 

Values for AEX may be found in the groxi^ing literature 
on solar energy conversion. Representative values are 0.25 for 
the southx^est desert and 0.45 for southeastern coastal areas. An 
alternative to entering AEX is to enter a flux levels, in Btu per 
hr-ft^ that is desired at solar noon (300 Btu/hr*-ft2) "" typical). 

The argument AEX is tested by subroutine SURFP. If gre ‘^er than 
1.0, noon solar flux is assumed, and a corresponding extinction 
coefficient is computed and stored for use. 

Note: The TRASYS approach to the planet surface environment does 

not yet include diffuse sources of solar energy such as clouds 
and atmospheric backs cat ter. 

A call to SURFP computes the two program variables 
DAl'JN and DUSK, the times of day for sunrise and sunset, respec- 
tively. These may be used as points in the heat flux tables in 
the same way as SHADIN and SHAOUT for orbiting configurations. 

4.3.10.2 Subroutines DIDT3 and DIDT3S 

Calling sequences: CALL DIDT3 (DIN^^SH, DIACCS, ITOD, DIPNCH, ISFAC) 

CALL DIDT3S (Ix’OD, Id FAC) 

These subroutines provide accuracy parameters and control 3 

flag definition for the DICAL segment x^hen using the. planet surface 
rption, 

DINOSd, DIACCS, DIPNCH and ISFAC are the usual direct 
irradiation accuracy parameters and control flags. (Ref* DIDTl) 

ITOD Is the time of day since midnight, hours/minutes, 4-digit integer 
(e.g,, 1537 for 3:37 PM, 0820 for 8:20 AM). Time of day may be input 
in decimal hours through the operations block statement TIMEPR - DV* 

TIMEPR may also have "DUSK" and "DAWN" as data values. TIMEPR is 
the time of day since midnight, hours. 
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4.3*10.3 Qrlentatloa on Planst Surface 


The planet surface option requires that the central 
coordinate system of the problem geometry be oriented as follows: 

a) the CCS z-axis is the local vertical 

b) the CCS y-axis points true north 

c) the CCS x-axis points due east 

No capability exists to orient the configuration 
through subroutine ORIENT. If re-orientation is required, the 
block coordinate system capability may be used. 
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5 . 


PROCESSOR SEGMENTS 


5.1 Pictorial Plot Segments 

5.1.1 Node Plotter 

Calling sequence: L NPLOT 

This segment provides the user with 3-dimensional and/or 
orthographic projection pictorial plots of his problem geometry. 
Its primary use is to verify surface data input prior to proceed- 
ing with computations of radiation interchange or absorbed heat 
data. Examples of its output can be found in Appendix H. 

This segment has no provision for user intervention in 
the form of program called subroutines that the user may modify. 
Control is provided through the NDATA or NDATAS subroutines. 

5.1.2 Orbit Plotter 


Calling sequence: L OPLOT 

This segment provides the user with a pictorial repre- 
sentation of his spacecraft in relation to the body it orbits 
and the sun. 

The planet and its shadow are depicted^ together with a 
pictorial view of the spacecraft in orbit. The standard output 
enables the user to verify his orbit in relation to the sun, and 
spacecraft orientation relative to the sun, planet, or star. 
Examples of its output can be found in Appendix H- 

This segment has no provision for user intervention be- 
yond that provided by subroutines ODATA and ODATAS. 

5.1.3 Data Plotter v 

Calling sequence: L PLOT 

This segment provides the capability to plot any com- 
puted or input data as x versus y plots. The segment automatically 
writes a binary plot data unit (disc or drum) for producing plots 
of incident or absorbed heat rates or fluxes as a function of 
time. 


The segment also provides a completely general plot capa- 
bility if the user inputs operations data block FORTRAN to pre- 
pare the plot data unit prior to executing the PLOT segment. This 
type of plot operation is illustrated by the plot unit format 
described belovj. 
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The plot segment flow diagram is shown in Figure 5-1. 
5.1.4 Binary Plot Unit Format 


Write format: 

NAME, 

N, (DATA (I) , I = 1, N) 

where: 

NAME: 

type of record 


N : 

number of words in data array 


DATA: 

array of data 


Record 1, TYPE = FElAME 

word 1 5HFEAME 

2 4 

3 XMIN 

4 XMAX 

5 YMIN 

6 YMAX 


Record 2, TYPE = LABELX 

word 1 6HLABELX 

2 MAXIMUM OF 5 

3 LABEL ARRAY 

4 

5 

6 
7 


Record 3, TYPE = LABELY 

word 1 6HLABELY 

2 N (MAXIMUM OF 7 (30 characters, maximum, per word) 

3 LABEL ARRAY (1) 

4 (2) 

5 (3) 

6 (4) 

7 (5) 


Record 4, TYPE = NODENO 

word 1 6HN0DEN0 
2 1 

3 INTEGER NODE if 


(30 characters, maximum, per word) 

( 1 ) 

( 2 ) 

(3) 

(4) 

(3) 













Record 5, TYPE = TITLE 1 

word 1 6HTITLE 1 

2 N(MAXIMUM OF 10, (60 characters, maximum, per word) 

3 TITLE ARRAY 1 

4 2 


12 10 


Record 6, TYPE = TITLE 2 

word 1 6HTITLE 2 

2 N (MAXIMUM OF 12, 72 characters, maximum, per word 

3 TITLE ARRAY 1 

4 2 


14 12 


Record 7, TYPE = INDEP, N = user supplied 

word 1 5HINDEP 

2 N (1 N 1 1000) 

3 DATA (1) 


N+2 DATA (N) 

Record 8, TYPE = DEPEND, N = user supplied, (must agree Xiiith number 

of independent data values) 

word 1 6HDEPEND 

2 N (1< N ^1000) 

Note: u) TYPE DEPEND can occur as many times on a file as 

desired for multiple plots on a frame. 

b) Any records but FRAME, INDEP and DEPEND types may be 
omitted . 

c) Record 8, words 3 through N + Z same as record 7. 

5.2 Form Factor Segment 


Calling sequence: L FFCAL 

This segment computes form factor matrices for any geo- 
metric enclosure using a numerical integration method. Internode 
blockage is accounted for with differing solar and IR transmis- 
sivities and, because semitransparent and specular surfaces are 


allcKveci tv;o form factor matrices are computed: FFS for the solar 

waveband and FFI for the infrared waveband. 

Blockage factors are also computed, printed and v^ritten 
to the re>*art tape* Blockage factors are defined as follows; 

tjp. . - „ Fii (shadowed) 

Fij (unshadowed) 

Provision for user intervention via the subroutine data 
block is available through three program-called subroutines: (1) 

prior to computation of each form factor through subroutine FFPRE, 
(2) at the completion of a row of form factors through subroutine 
FFROW, and (3) at the completion of the entire matrix through sub- 
routine FFEND. The logic flovj of the FFGAL segment is shown in 
Figure 5-2 - 


FFCAL provides printed output, as well as punched cards 
or tape in FOBII FACTOR DATA Block format, at the user's option. 

FFCAL employs two techniques to avoid inaccuracies in- 
herent to the double-integration form factor computation technique* 
First, it tests the node areas involved before beginning a com- 
pute tion^ and makes certain that the factors are always computed 
from the smaller node to the larger node* Second, if an area- 
distance criteria is violated, nodes are temporarily subdivided 
into sub-nodes for form factor calculation* See Appendix B for 
more detail on this subject* 

An optional computatioTi^il approach utilizing the Unit 
Sphere Method can be specified by the user. For planar surfaces 
which are very close together and/or highly converging and are not 
shaded; this method is the better of the two approaches* For the 
restrictions, and how to implement the Unit Sphere Method see 
Section 3. 3*5.5. 

5.3 Radiation Interchange Segment 

Calling sequences: L GBCAL 

Segment GBCAL computes a matrix of diffuse grey-body 
radiation Interchange factors and places them in out-of-core 
storage for later use in computing absorbed heat or radiation 
conductors. Solutions for either the solar and/or infrared wave 
bands may be requested. No user intervention provisions are made 
beyond that of subroutine GBDATA. 
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5,4 


Radiation Conductor Segment: 


Calling sequence: L RKCAL 

Segment RKCAL computes radiation conductors for thermal 
analyzer models and provides output in punched card or BCD tape 
form. A printout of the card/tape record images is also provided. 
Three program-called user routines are used to provide user 
intervention through his subroutines block. Subroutine RKPRE pro- 
vides for any special initialization desired before computations 
begin. Subroutine RKPNGH performs the actual punch/ tape write 
operations, and the user may obtain data in any thermal analyzer 
program format by altering format statements in this routine. User 
routine RKEND provides for user intervention prior to return to 
operations block control. Figure 5-3 shows segment RKCAL logic flow,. 

An example of RKCAL output can be found in Appendix H, 

5.5 Radiation Condenser Segment 

Calling sequence: L RCCAL 

Segment RCCAL computes radiation conductors, simplifies 
and condenses these conductors using the ERN and MESS techniques, 
and provides output in punched card and/or BCD tape form, A 
printout of the card/ tape record images as well as the original 
(uncondensed) RADKS is also provided. Three program-called user 
routines are used to provide user intervention through his sub- 
routines block. Subroutine RCPRE provides for any special in- 
itialization desired before computations begin. Subroutine 
RCPNCH perforins the actual punch and tape write operations, and 
the user may obtain data in any thermal analyzer program format 
by altering format statements in this routine. User routine 
RCEND provides for user intervention prior to return to operations 
block control* Figure 5-4 shows segment RCCAL logic flow* RCCAL 
theory is presented in Appendix F. 

5,5.1 Sample Problem Using ERN/MESS Technique 

The optics housing of the High Altitude Observatory (HAO) 
solar telescope, which is mounted on the Skylab Apollo Telescope 
Mount, is sho™ in Figure 5-5 Both the original enclosure and 
the modularized enclosure are shot^n along with the ERNs and the 
MESS nodes* Figure 5-6 shows the nodal breakdoim for the enclo- 
sure* 


TRASYS input for subenclosure 1 (see Figure 5-6) is shoi-m 
in Figure 5-7. 
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CALL 

RKPRE 

y 

- 

FIND IR 
FACTORS 

CALL : 

FINDST 

1 


READ 

CORRE- 

SPONDENCE 

DATA 


ROUTIHE 


P- 
2M0 


ROUTINE 


COMPUTE 

RADKS 

TO 

SPACE 


PUNCH RADKS 


CALL RKPNGH 


NO 

V 

COMBINE RADKS 

CALL RKCMBN 


ROUTINE 1 CALL RKEND 


RETURN 


Figwe 5-3 Segment RKCAL Flan Biagmm 


















RCMMN 


CALL RCPRE USER ROUTINE 


FIND IR 

FACTORS 

CALL 

?INDST 

1 

— 



READ 

CORRESPONDENCE 

DATA 

CALL 

ICINIT 


ICMBL=0" 

AND 

,NERN=0 > 


^ODE (I) 0^ 
vNQDE (J) MESS^ 

\nodes? 


PUNCH CONDUCTORS 
IF FLAGGED "SAVE" 


PUNCH ONE-WAY 
>IESS CONDUCTORS 

CALL RCPKCH 


Sm UNFLAGGED CON- 
DUCTORS AND PUNCH 
CONNECTIONS TO ERN 

I :: 

CALL RCFKCH 


wU- 



:rksp=5Hspage 


TRANSPOSE HALF FA 
tIATRIX TO OBTAIN 
FULL tlATRIX 

CALL RCTRAN 


PUNCH CONDUCTORS 
TO SPACE 


CALL RCEND 


USER ROUTINE 


ICMBL^O 


COMBINE FAs 
CALL RCCJffiN 


^ ; ^ _ 

ARRANGE CONDUCTORS 
IN DECREASING ORDER 
OP FA MAGNITUDE 

SET "SPECIAL NODE” 
SIGNIFICANT FRACTIONS 
TO 1,0 

GENERATE SIGNIFICANT 
CONDUCTOR SUMS 


^ODE (I) OR^ 
NODE (J) MESS^ 
"\NODES? 


PUNCH REGULAR 
CONDUCTORS 

CALL RCPNCH 


PUNCH ONE-WAY 
MESS CONDUCTORS 


FLAG CONDUCTORS TO 
BE SAVED 

CALL RCPSSL 


THgar« 5-4 Segment HCCAL Flow Diagram 
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Figure 5-5 SAO Experiment Optics Housing Modularised Enclosures 
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• Diffusion Nodes 



JS Radiation Boundary 
Nodes 


6 Apollo Telescope Mount HAO Experiment 
Optics Housing Sample Problem 




HEADER OPTIONS DATA 

TITLE RAOIATlnn CONDENSER SAMPLE PROBLEM 
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=HAO 

HEADER 

ARP ay DATA 



IPPIHE 

=51 


ISECND 

= 52 
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SURFACE DATA 


S 

SUPFN 

= 1 


TYPE 

= RECT 


ACTIVE 

=TOP 


SHADE 

= FF 


bshaoe 

=FF 


Pi 

= 10. , 


PPQP 

= 0.1, 


S 


header 


SUREN =2 

TYPE =RFCT 

ACTIVE =TOP 

SHADE =FP 

SSHAOE =FF 
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UNNT =1.3125,2.2875, 3,2 62 5 ,A-, 172'?, 11.351,15.5575,25.5045, 

2fl .6545, 3-1. 6295, 37. 6495 , 45. 55 88, 54.4125,63 ,23 18 , 72 , 0855 
PROP =0.9, 0,9 
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2, 
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RCCAL Sample Problem Input 
(Q<nt) 


HEADER CORRESPONDENCE DATA 
FIG HAO 


I 


2266 =1 

2270 =2, 3,4, 5 

2255 =6 ■ 

2254 =7 i 

2252 =8 

2243 =9 

2253 =10 

51 =11 

2264 =12 

2265 =13 : 

2259 =14 i 

2258 =15 

2240 =16 

HEADER OPERATIONS DATA 

BUILD HAO, ALLBLK I 

CALL FFDATA(0, 0,0, 0,0,0, PUN, NO) 

L FFCAL 

CALL GBDATA(2HIR,3HHA0,2HFF) 

L GBCAL 

CALL RCDATA(3HHA0, PUN, 0,1000,0, 999, 0, 1. /144. , NO, 0,0, | 

1 0.9,91,IPRIME,ISEGND) | ! 

L RCCAL 

END OF DATA ■ 


Figiive 5-7 RCCAL Sample Rioobl&n Input 
Caonal) 
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3-6 lUrecL Iri^adlation Sei^ment 

Cr>Ilin^4 scquijnce: L DICAL 

This sej^meat compulei^ the thermal radiation directly 
incident on external spacecraft surfaces due to the presence of 
the sun or a nearby planet. Three components are computed: 
direct solar, reflected solar trom the planetary surface (albedoj 
and infrared planetary emission. Shadowing effects due to inter- 
node blockage are accounted for. Norma lly, shadowing is computed 
analytically by determining if each vector from each node element 
to a heat source (sun or planet element) is blocked by an interven- 
ing surface. At the users option, shadowing may be computed by 
the use of shadow data on a restart (RSI) tape. This requires 
that the SFGAL segment be executed prior to any DICAL executions- 
If a restart tape is present, SFCAL will read the shadow data from 
It, make it available on a file used by DICAL, and set a DICAL 
flag that will bypass the analytical shadow calculations. If 
no RSI tape is present, SFCAL will compute Che required shadow 
factor tables* 

When using the externally - supplied shadow factor tables, 
DICAL will revert to an analytic calculation each time a shadow 
factor table must be interpolated over a shadow factor range greater 
than 0.5. 

Four program called subroutines are provided for user 
inter^^ention through his subroutine data block. Subroutine 
DIPRES provides for special initialization prior to solar flux 
calculations* Similarly, DIPREP is called prior to planetary/ 
albedo flux calculations. Subroutine DIENDS and DIENDP provide 
for user intervention subsequent to solar and planetary/albedo 
calculations, respectively. Figure 5-8 depicts the logic flov7 
of segment DICAL 

DICAL output is placed in out-of-core storage for later use 
in absorbed flux calculations. In addition, direct irradiation data 
may be output to punched cards or tape in HEADER FLUK DATA block for- 
mat at the User's option. A printout of the direct Irradiation data 
is provided also. An example of DICAL output obtained utilizing the 
ORBGEN option (Reference Section 3. 3. 9. 2) can be found in Appendix H- 


Preceding page blank 


REV. 1 
5-17 























5,7 


Shadotiy Factor Segment 


Calling sequence: L SFCAL 

Thi!^ segment computes shadow factor tables for each node 
of a spacecraft configuration to be used in direct irradiation cal- 
culations when it is desirable to save computation time at the 
expense of some accuracy* 

By including a L SFCAL call prior to any DICAL call the 
program compute shadc«*r factor tables for the given configuration, 

and/or utilize precomputed shadow factor tables to obtain, by interpo- 
lation, the solar and planetary shadow factors for each node and at 
each orbit point. The entry points to the tables are the nodal clock 
and cone angles for the position vector to the sun or to a specific 
planetary element* Inaccuracies occur because the tables do not 
accurately reflect shadow entry and exit points for all nodes* The 
program minimizes this to a degree by computing a flux with shadowing 
entirely in the DICAL link whenever a shadow factor must be interpo- 
lated between points with data value differences greater than 0.5* 
Through utilization of the Shadow Factor Data Block (ref. Section 
3.3*6) known shadow factors can be Input and/or direction given for 
the computation or recomputation of selected portions of the shadox^r 
factor table* 

Primary output for this segment is a file on the RSO tape 
containing shadox7 factor tables for each node. This file contains 
shadow data packed according to a format as presented in Appendix C* 
The shadow factor tables are also output in printed form as they are 
computed. Shadox^ factors for both the solar and infrared x-^avebands 
are computed, because semitransparent shadox^ing surfaces are allox^^ed* 


No user intervention is provided for this segment. Prior 
to an SFCAL call, the user may set a flag to obtain punched shadox<7 
factor data through the statement SFPNCH = 3HPUN* Punched output 
obtained x^ill be in shadoxi? factor data block format. 

Nhen shadow factors are read from an RSI tape the print- 
out of the shadox^ factor tables are normally surpressed* They may 
be printed by including the OPERATIONS DATA Block before the SFCAL 
CALL the statement SFPRNT - Y^ES. 
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Absorbed Heat Segment 


Calling sequence: L AQCAL 

This segment utilizes direct irradiation and radiant 
interchange data in out-of-core storage as input. From this, it 
computes absorbed heat values for each external spacecraft node. 
Internode reflections are accounted for in both the solar and 
infrared wavebands. 

No user intervention through the subroutine data block 
is provided ♦ 

Segment AQCAL output is placed in out-of-core storage. 
Printed output of the Solar, Albedo and Planetary absorbed values 
with Correspondence Data applied is also provided as an option. 

An example of AQCAL output can be found in Appendix H. 

5 .9 Absorbed Heat Output Sement 

Calling sequence: L QOCAL 

This segment utilizes absorbed heat data in out-of-core 
storage to provide heat source tables in thermal analyzer format. 
At the user's option, heat versus time tables and/or orbital 
average heat data are provided for each external node. 

Output is provided on punched cards or BCD tape. Q 
versus time data is in thermal analyzer array data format, with 
a singlet time array and a corresponding singlet Q array for each 
node. Also punched are thermal analyzer interpolation subroutine 
cards for each node. Orbital average data is punched in source 
data block format. 

Standard output is in SXNDA thermal analyzer format. 
Subroutine DAll^IDA is used for the interpolation subroutine. Out- 
put for other thermal analyzers may be obtained by altering the 
format statements in subroutine QOSAVE and entering the altered 
version in the subroutines data block. Card image printout of 
QOCAL output is provided. An example can be found in Appendix K. 

Segment QOCAL logic flow is shown in Figure 


REV. 1 
5-20 





FIND AQ DATA 
CALL FINDS! 



CALL SORTDL 



Figure 5-9 Segment QOCAL Flew Diagram 














5.10 Form Factor Combining Segment 


Calling sequence: L CMCAL 

Segment CMCAL is used to apply correspondence data to a form factor or 
image factor matrix that was previously computed and placed in data storage. 
After applying the correspondence data, the resulting matrix of combined form 
factors is icjritten to data storage for later use by the 6BCAL program segment. 
CMCAL will apply the auto-correspondence data (generated by polygon input) 
and/or users-supplied correspondence data at the option of the user. User 
control is applied through subroutine CMDATA. CMCAL can be used to combine 
form factor matrices, as computed and/or stored by the FFCAL segment, or it 
can combine image factor matrices, as computed and/or stored by the RBCAL 
segment. Please note, however, that it is not possible to combine FFCAI 
output, and then attempt to compute combined image factors using EBCAL, The 
execution sequence must be FFCAL, RBCAL and CMCAL, in that order. The CMCAL 
flow diagram is shoxTO in Figure 5-10.. 


5.11 Image Factor Segment 

Calling sequence: L RBCAL 

Segment RBCAL is used to compute one aspect the effects of specular - 
diffuse surfaces on radiant interchange factors. When specular-diffuse surfaces 
are present, the form factors may be considered to have t\ro components; the 
direct or geometric form factor from node I to node J, plus the "image" com- 
ponents resulting from the images of node J as seen by node I in all visible 
specular surfaces. In TRASYS, the direct form factors are computed by FFCAL. 
EBCAL is then used to generate the nodal images in each specular surface, 
compute the various form factors to the images and add them to the direct form 
factors. The resulting modified form factors, dubbed image factors, are written 
to data storage. Segment ®CAL can then be used to generate radiant interchange 
factors from the image factor matrix and nodal suirface properties. 

Segment EBCAL considers first order specular bounces only, that is, images 
of images are not generated and considered. Appendix I presents the theory used 
in RBCAL. The segment RBCAL flow diagram is shorn in Figure 5-11. 

5.12 Direct Irradiation via Specular Surfaces - Segment DRCAL 
Calling sequence; L DRCAL 

The total direct irradiation that reaches a nodal surface consists of that 
reaching it directly from the sun or planet element plus that reaching it from 
images of the sun or planetary element as seen in specular surfaces. Segment 
DRCAL computes the irradiation resulting from the images in the same manner 
that segment DRCAL computes the specular-bounce components of the image factors. 
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Figure 5-^10 Segment CMCAL Floio Diagram 
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In. the present version of TKASYS, DRCAL does not compute the specular 
component of planetary irradiation because it is not felt that the compute 
time is justified. The flow diagram for segment DRCAL is shown in Figure 5-14. 
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USER 

ROUTINE 



USER 

ROUTINE 


Figure 5-12 Segment DRCAL Flow Diagram 
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APPENDIX A 


RESERVED WORD LIST 


A-2 


Reserved x-iord list 


all segments plus operations data. 


A(): iMMr 

Al an 

ALL 

A THT 

betas * 

BETA 

CM 

CONE 

GANN 

DIPNCH 

OIRGT 

dltlne 

DUSK 

DWP 

EAR 

F FCM0 

FFDISF 

FFMIN 

FF 

GBMBNO 

GRAV 

f AQGBI 

I AGoes 

1 AQSDA 

ICALFL 

ICMBL 

lEQFF 

I MESS 

INCORE 

INDXAR 

INSHAD 

iOPNNP 

iOPNVU 

lOVL 

I PAGE 

IPLAFL 

IQOARY 

IQOCOR 

IQOTAB 

IROTY 

IROTZ 

IRSI 

ISKIP 

ISKPSO 

isolfl 

1 trcao 

I TRCBO 

I TRCCO 

i TRC^O 

ITRC50 

1 TRCBO 

JUMPFF 

JUP 

KBCOOU 

KSTEP 

KTRAJ 

LINE 

ML INE 

MODELN 

MOO 

NBLKLN 

NOIR 

NOI 

NGBIRR 

NG0IR 

NGBSO 

NLBCSN 

NLCQD 

NLCQV 

NLUQD 

NLUQV 

NMESS 

NNOD 

NN 

NODE 

NPLS 

NPNNP 

NPT I T 

NRAPD 

NRARP 

NRAV 

NRCQV 

NR IN 

NRIOP 

NRSP 

NRTD 

NRT I 

NSCRI 

NSCR2 

NSCR3 

NSSTEP 

NSTEP 

N5TPL 

NTL 

NTQR 

NTQ 

ODTEMP 

OINC 

ON 

OPT IMP 

OPT IMS 

OPTRUE 

PI 

PLCL 

plco 

PLT I T2 

PLTYPE 

plxmpf 

PSD 

PSH 

PUN 

qotape 

QOTMPF 

QOTYPE 

rfrac 

RKAMPF 

RKMIN 

ROTY 

Rorz 

RPLAN 

SAT 

SAVE 

SFPRNT 

SOLAR 

SOLO 

SOL 

SRIR 

SRSO 

5TRDEC 

SUNPVO 

SUNRA 

SUN 

T 1 TLE 

TME 

TRIR 

T5TR 

URA 

VEN 

ZNPROT 

ZNPSCL 



AL PH 

APER 

AREA 

BOTH 

C IGMAS 

C ICMA 

Di ACCS 

Dl ACC 

DIMS 

DSTR 

DTE 

□ 7R 

ECC 

EMISS 

FFACCS 

FFNOSH 

FFPNCH 

FFPRNT 

HA 

HP 

I A I 

1 AQ5DP 

f AQSOS 

IAS 

IFFSHO 

IFS 

IHSTEP 

I NDXN 

INDX5 

INDXB 

lOPNV 

lOPT I T 

lORGi T 

IPLNA 

IPLSN 

IPLUNT 

IQOTME 

IRKCN 

IRKNSP 

IRTI 

IR 

ISDTR 

I5PEC 

ISPND 

iSTPOR 

I IRCDO 

1 TRCl 0 

i TRCBO 

I TRC70 

I TRCBO 

I TRC9D 

KRSi 

KRSO 

KRT i 

MAR 

HAXBC 

MER 

MRSP 

NBCOOU 

NBCD5K 

NEP 

NERN 

NFFR 

NJOB 

NLAD 

NLAV 

NUN 

NLIS 

NLSD 

NMODIR 

NMOOLS 

NNOOC 

NOSH 

NOUT 

NO 

NPUN 

NPVU 

NRAND 

NRBCSO 

NRBCSN 

NRBCSR 

NR IS 

NRSD 

NRSI 

NRTO 

NRT 

NRUQD 

NSPEC 

NSPFF 

NSPND 

NSTSOL 

N5URF 

NS 

NTRAJ 

NUSE R I 

NUSERB 

OPROr 

OPRPLN 

OPSCLR 

ORNT 

PALB 

PERIOD 

PLCRVF 

PLLABX 

PLLABY 

PLYMPF 

PNAME 

PRAD 

QOAMPF 

QOFMPF 

QOPNCH 

RALB 

RATE 

RB 

RKPNCH 

RKSP 

RKTAPE 

R50LAR 

RSUN 

rtd 

SHAD IN 

SHAD 

SHAOUT 

SPACE 

SPINT 

SREFL I 

STRRA 

SUNCL 

BUNCO 

TAPE 

TIMEPR 

T IME5T 

TRSO 

TRUANF 

TRUAN 1 

WDS 

HSS 

WSUN 


ASUN 

CLOCK 

D I NOSH 

DUMSF 

FFACC 

FFRATL 

I ALBFl 

I AUTOC 

IKS 

I NDX 

lORNT 

IPRDMP 

IROTX 

ISFT 

I TRALL 

I TRC30 

JUMP D I 

KRTO 

MI TS IN 

NBLKDR 

NFF 

NLBCSD 

NLTD 

NNODU 

NPLSR 

NRAN 

NRCQD 

NR50 

NRUQV 

NSQNTL 

NTl TLE 

NIRBK 

0P5CL 

PER 

PLT I T 1 

PR 

QORMPF 

READ 

ROTX 

RTHET 

SIGMA 

SREFLS 

SUNDEC 

T I MSP 

TRUE AN 

VES 


in addition to the reserved word list above, the following reserved words 
must be preserved when working in the particular segments noted. 

Segment AQCAL 

QDS, QDR, QDP, QAS, QAR, QAP, GBSO, GBXR, AQTEMP 
Segment DICAL 

QDS, QDR, QDP, ISHAD 
Segment FFCAL 

FFVALI, FFVALS, BFE, BFA, ISHAD, SUM, INDXF, DATA, ICATEG, ICOMB, 
SCRIR, SCRSO, IX, RBVALI, RBVALS 
Segment GBCAL 

FA, SPACE, XSPACE, IX 
Segment NPLOT 
MNP 

Segment OPLOT 
MSP, JSURF 
Segment PLOT 
IX 

Segment QOCAL 

NODET, QAVERG, ICOMB, IFIRST, AREAT, IX 
Segment RCCAL or RKCAL 

ISPN, MSND, NDS, SF, SPACNO, E^^;T, AREAT, IX 
Segment SFCAL 

ISHAD, QDP, QDR, QDS 
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APPENDIX B 

FOm FACTOR CALCULATION ACCURACY 




ELEMENTAL GRID VARIATIONS 


The form factor for two finite areas j and (Fig. B-1) , is de- 
fined as 



IB-1] 


Figure B-1 . 'c termination of Form Factors 


A finite-dif ference approximation of Equation [B-1] is 
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[B-2] 


Equation [B-2] approaches an exact representation of Equation 
[B-1] as the size of the elemental areas, and A., approach 

zero. For identical, parallel, directly opposed rectangles, the 
empirical relationship of elemental area size-to-separation dis- 
tance versus form factor error shown in Figure B-2 is obtained. 
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MTRAP version 1.0, LOHARP, and TRASYS use Equation B-Z, modified with, 
a shadowing constant, to compute form factors. The total number (l.e., 
size) and distribution of elemental areas is left to the user to define 
in MTRAP version 1,0 and LOHARP* The number of elements to be selected 
is defined by the closest node a given node ’*sees," The selection of 
elements, however, usually ends up being somewhat arbitrary or simply a 
matter of economics; i.e,, the finer the grid, the more machine time 
required. In reality, the selection of elemental areas is an independent 
problem for each form factor. 

The basic assumption for reasonably accurate form factors is, from Equa-- 
tion B“6 3 that the elemental area size is small compared to the separa- 
tion distance between two elements. 


The TRASYS program uses a technique using Equation B--6 to automatically 
select the element grid sizes of each node pair consistent with a user- 
defined accuracy parameter, FFAGC. If all elemental areas on each of 
two nodes were the same size and had the same separation distance, r^ 
the apparent number of elements on a node to satisfy the accuracy 
value FFAGC would be (from Equation B-6 ) 


■ij* 


~ A. (FFAGC) 


COS 0^ cos 0J 


r. , 
3.J 
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Since each element pair on the two nodes may have a different separation 
distance, a different apparent number of equal -sized elements will be 
required. 

The approach used in the TRASYS program is a simple arithmetic average 
of element contributions, i.e. , 


ni. 


N 


optj (FFACC)inj_ 


ra. 

J 


1=1 j -1 


COS 9. cos 0- 
X 


r . . 

xj 


B-S 



for nodes 1 and J* 


The initial number of elements is chosen just large enough for a 
representative sample. A similar optimum number of elements for node 
J can be defined. 
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The total number of elements defined by Equation [B-8] Is dis- 
tributed uniformly over the node using a criterion that attiiiiipts 
to make the elements square. The arithmetic average technique 
assumes that the mean separation distance between nodes is large 
compared with the variation of separation distance over the two 
nodes. A check is made to see if this assumption Is violated. 
The maximum number of elements defined by any element pair on 
the two nodc'ii (Equation fB-71) is compared with the arithmetic 
average value (Equation [B-SJ). If the ratio of N /n . is 
FFRATL 

greater than N > the two nodes are temporarily subdivided 

FFRATL 

into subnodes. N is an input value defined by the user. 


The numbers of subnodes used are proportional to ^N^^x/^opt) 
and ^^jjjax^^optj ' optimum grid elements are computed inde- 


pendently for each subnode using a separation-distances weighted- 
average criterion, rather than an arithmetic one. The form factors 
resulting from the subnode pairs are then combined using form- 
factor algebra. Thus, elemental grids vary for each form factor 
and may be nonuniform over a node as required to satisfy input 
accuracy requirements. 


B. NODAL PRKLIMINARY SHADOWING CHECKS 


Shadowing checks between elemental areas account for considerable 
machine time. Machine time could be saved if unnecessary checks 
were eliminated. The usual procedure in MTRAP version 1.0 is to 
process all the surfaces until either the form factor contribution 
is reduced to zero by shadowing surfaces, or all surfaces identi- 
fied as shadowers have been investigated. The function of the 
nodal shadowing checks is to eliminate from the element- to -element 
shadowing checks all surfaces that cannot cause shadowing on any 
portion of the two nodes under consideration. The technique used 
in the TRASYS program is a significant modification of the tech- 
nique used in LOHARP. 
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The nodal shadowing checks consist of constructing a sphere around 
each node for which form factors are being evaluated and for each 
shadowing surface* The radii of the spheres are such that the 
node or surface is completely enclosed* A test cylinder or cone 
frustum, depending on the relative sizes of the two spheres in 
question, is construe^ ted as shown in Figure B-3. For the cylinder, 
the radius is equal to the larger of the two spheres* The cylinder 
or cone frustum's axial coordinate is a vector betxireen the centers 
ol the two spheres plus the sum of the tvjo sphere radii* Next, 
the shadox\ring surfaces' enclosing spheres are checked to deter- 
mine whether they intersect the test cylinder or cone frustum* 

Only surfaces whose sphere intersects the test cylinder or cone 
frustum x-fill be considered in the actual element-to-element 
shadowing checks for these two nodes. 


This technique of preliminary shadowing checks allows identifica- 
tion of any surface that shades the nodes in question* However, 
other marginal ones will also be identified. 


In the detailed element-to-element shadowing checks, an element 
pair is either completely shadowed or not at ail. The accuracy, 
then, of representing the shadow is proportional to the total 
number of elements on both nodes* The number of elements on the 
shadowing surface(s) is of no consideration* In the^TRASYS _ 
program it is assumed that accurate shadowing is required only 
for large-magnitude form factors. If the preliminary shadowing 
checks identify shadowing surfaces for the form factor in ques- 
tion, thu number of elements defined to -represent the shadow is 



B^FFACCS) 



[B-9j 


where 

FFAGCS is an input shadowing accuracy factor, and 

B is a proportionality constant determined by trial and error* 

The number of elements used for any given node for form factors 
is taken as the maximum of that defined in Equation [B-8] or 
Equation [B-9] * 
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Surface Ignored 



Figure B~3 Nodal PrelimLnary Shadowing Techniques 
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RESTART TAPE FORMAT 


The master restart tape consists of two data files, the first written 
during preprocessor execution and the second during processor execution* The 
first file consists of edit history data and images of all active and inactive 
input data cards* 

The second file consists of one or more "pseudo-files*^ begun with a stand- 
ard header record and ending with a standard trailer record* Each restartable 
processor segment (FFCAL, GBCAL, SFCAL, DICAL, RBCAL, CMCAL and DRCAL) writes a 
pseudo-file c.jutaining the data necessary to restart an interrupted job with 
minimum repeated calculations. Also, there is a pseudo-file for each type of 
correspondence data, automatic, form-factor and GB. In addition, pseudo-files 
containing nodal property data are produced by CMCAL, from any BUILDC/ADD series, 
or from any series of calls to data modification routines (Ref* 4*3*8). The 
correspondence data and property data pseudo -files are provided only for use by 
special TRASYS / thermal analyzer interface programs, and are not used in restart 
operations. Also, there may be a pseudo-file of direct -incident shadow factors 
for printout in restarted runs* 

header record format 

Word 

1 Record number (consecutive from beginning of file) 

2 DATE 

3 TIME 

4 6HHEADER 

5 CONFIGURATION NAME (6 characters, max*) 

6 RESTART POINT (restartable), ACCESS NO* (node, area, property arrays) 
or STEP NO* (absorbed fluxes and incident fluxes) 

7 One of the following LABEL words: FFCAL, GBIR, GBSO, SFGAL, CMCAL, RBCAL 

(with restart point); or PROPBD (from BUII.DC, with access no*); or PROPCG 
(from mod routines with access no.); or PROPCM (from CMCAL, with access no.) 
or AQCAL, DICAL, DRCAL (with step no*); or CORRES, GORRFF, SHFAC* 

8 TYPE OF COMBINING (CM,AU,AUCM) For CMCAL, GBIR, GBSO, AQCAL files; job 
number for other files* 

9 NO, OF NODES for CMCAL, GBIR, GBSO, AQCAL files; date for other files* 

10 thru 12 - SA>IE AS 1 THRU 3 
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TRAILER BECORD FORMAT 

Words 1 through 3 contain record number, date, time 
Words 4 through 9 contain 3HEND 

Words 10 through 12 contain record number, date, time 

CORRESPONDENCE DATA PSEUDO-FILE FORMAT 
Record 

1 HEADER (contains CORRES or CORRFF as label) 

2 THRU N - Correspondence data records. Each record 100 words or number 
of nodes words long, whichever is least. 


N + 1 Trailer record 


PROPERTY ARRAY PSEUDO-FILE FOBI^IAT 
Record 


1 HEADER (contains PROPBD or PR0PG6 as label) i 

2 4HNODE, NNOD, (NODE(I), I = 1,NN0D)* 

3 4HAREA, NNOD, (AREA(I), I = 1,NN0D)* 

4 5HEMISS, NNOD, (EMISS(I), I = 1,NN0D>* 

5 5HALPHA, NNOD, (ALPH(I), I = 1,NN0D)* 

6 4HTRIR, NNOD, (TRIR(l), I = 1,NN0D)* 

7 4HTRSO, NNOD, (TRSO(I), 1= l,NN0D)^'f 

8 4HSRIR, NNOD, (SRIR(I) , I = 1,NN0D)* 

9 4HSRS0, NNOD, (SRSO(I), I = l,NNOD)* 

10 Trailer record 

If label is PROPCM, records 10 and 11 contain: 

10 4HICCMB, ICMBL, (ICCMB(I), I = 1,ICMBL)* 

11 Trailer record 


where : 

NODE = Node identification numbers 
NNOD = Number of nodes in problem 


AREA 

EMISS 

ALPHA 

TRIR 

TRSO 

SRIR 

SRSO . 


Node surface properties (Ref. Table III-3) 


*Note: All data records begin and end with record number, date and time 
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lOIBL = Length of ICCMB array 

ICCfrlB = Array of combined node identification numbers 


DICAL PSEUDO-FILE FORMAT 


Record 


1 Header (label = 5HDICAL) 

2 MOD, TBIEPR, TRUEAN, (NODE (I), I 1,NN0D)* 

3^ KEPT, SHADR, SHADP, ((PLAVT(I, J) , I = 1,NEPT) J= 1,3)* 

4^ (SDMR(I), SDMP(I), I = 1,NEPT)* 

2*M0D+2 MOD, (QDS(I), 1= 1,M0D)* 

2*M0D+3 mod, (QDR(I), I = 1,NN0D)* 

2*NN0D+4 MOD, (QDP(I), 1= l,MOD)* 


2*M0D45 Trailer record 
■^^here : 

NNOD = Number of nodes 

TH-IEPR = Orbit time 

TRUEAN = True anomaly 

NODE = Node identification numbers 

NEPT - Number of elements on planet 

SHADR = Node - planet shadox^f factor (solar T7aveband) 

SHADP = Node - planet shadow factor (IR waveband) 

PLAVT - Planet element area vectors (3 components) 


SUMR = Form factors from node to planet elements (solar x^aveband) 
SUMP = Form factors from node to planet elements (IR xi?aveband) 


QDS^ QUR, QDP = Incident solar, albedo and planetary flux values 

%OTES: Records 3 through 2*NN0D-hl exist only for circular planet 
oriented orbits. Otherwise this pseudo-file contains 6 
records only. 

-All data records begin and end with record ntfraber, date and time* 
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DRCAL PSEUDO-FILE FOR! vT 
Record 

1 Header (label = 5HDRCAL) 

2 MOD, TIMEPR, TRUEAN, (QDS(I), QDR(I) , QDP(I), I = l,NNOD)* 

3 Trailer record 

Reference DICAL format for variable definitions. 

FFCAL PSEUDO -FILE FORHAT 
Record 

1 Header (label ^ 5HFFCAL) 

2 IROW,J, (FFVALI(I), I = J,NNOD), (FFVALS(I), I = J,NNOD), 

BFE(I), I == J,NNOD), (BFA(I), I = J,NNOD)* 

HNOD+2 Trailer Record 
where: 

IROW = "Emitter” node number 

J — Integer location (in node array) of emitter node 
(T.GE.J.LE*NNOD) 

MOD = Number of nodes 

FFVALI - Infrared form factors from emitter node to receiver node 
FFVALS = Solar form factors from emitter node to receiver node 
BFE = Blockage factors corresponding to each FFVALI 
BFA = Blockage factors corresponding to each FFVALS 

*^NOTE: All data records begin and end with record number, data and time. 
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AQCAL PSEUDO-FILE FORMT 
Record 


1 Header (label = 5HAQCAL) 

2 MOD, TIiyiEPR, TRUEAN, (NODE(I), I =l,NNOD) 

3 NNOD, (QAS(I), I = l,NNOD) 

4 NNOD, CQAR(I), 1=1, NNOD) 

5 NNOD, (QAP(I), I =1, NNOD) 

6 Trailer record 
where : 

NNOD = Number of nodes 

TXMEPR = Orbit time 

TRUEAN = True Anomaly 

NODE = Node identification numbers 

QAS, QAR, QAP = Absorbed solar, albedo and planetary heat values 


SHFAC PSEUDO-FILE FORM'! 

This pseudo file is obtained when ISFAC = YES and is used to printout 
the DI shadow factors for restart runs. 

Record 


1 Header Record (label = 5HSHPAC) 

2 (SHADS(I), 1=1, NNOD)* 

3 (SHADR(I), 1=1, NNOD)* 

4 (SHADP(I), 1=1, NNOD)* 

Inhere : 

SHADS = Solar shadow factor 
SHADR = Albedo shadow factor 
SHADP = Planetary shadow factor 


* All data records begin and end with record number, date and time. 


GMCAL PSEUDO-FILE FORMAT 


' Record 

1 Header record (label = 5HCMCAL) 

2 MODC, IGMBL, (ICATEG(I), 1= l^NNOD), (ICCMB(I), 1= 1,ICMBL) , 
(NODEC(I), AREAC(I), EMISSC(I), ALPHC(I), TRIRC(I), TRSOC(I), 
SRIRC(I), SRSOC(I), 1= l,MODG)v^ 


NN0DC42 Trailer record 
where : 


NNODC = liTumber of nodes after combining 
ICMBL = Length of ICCMB array 
ICATEG - Combining Category array 
ICCe^IB = Correspondence data array 
NODEC = Node no, array after combining 


AREAC 

EMISSG 

ALPHC 

TRIRC 

TRSOG 

SRIRC 

SRSOC 



Node property arrays after combining 


GBGAL PSEUDO-FILE FORMAT 


Record 

1 Header record (label = 4HGBIR or 4HGBSO) 

*NOTE: All data records begin and end with record number, date and time* 
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2 IROW*, SPACE, (FA(I), 1= J,NWOD*) 


NN0D4-2 Trailer record 
where : 

XROW^ = Number of emitter nodes 

SPACE = Radiation interchange factor to space 

FA = Array of radiant interchange factors from emitter node to 
receiver nodes 

NNOD = Number of nodes 

J “ Integer locator number of node IRON 

*NOTE: If CMCAL has been executed, NNOD NNODC and IROW = NODEG(J) 


RBGAL PSEUDO-FILE FQB^^AT 


Record 

1 Header Record (label = 5HRBCAL) 

2 IRON, CRBFALI(I), I = J,NNOD) , (RBVALS(I), I = J,NNOD)* 


NNOD+2 Trailer record 
where ; 

IROW = Node number of emitter node 

RBVALI = Array of “total" form factors from emitter to all receivers 
(infrared waveband) "total" form factor includes direct 
form factor to receiver, plus form factors to all images 
of receiver as seen in specular surfaces* 

'^NOTE: All data records begin and end with record number, date and time. 
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RBVAI5 = Same, for solar waveband 
J = Integer location for node IROH in NODE array 
NNOD = Number of nodes in problem 

SFCAL PSEUDO-^FTLE FOBMAT 
Record 

1 Header record (label = 5HSFGAL) 

2 NNOD, (NODE(I), I = l.NNOD)* 

3 JCNT, (IDATA.KI), I = 1,JCNT)* 

4 JCNT, (IDATAS(I), I 1,JCNT)* 


2*NNOD/10+3 KCNT, (IDATAI(I) , I = 1,KCNT)* 

2*NNOD/10-!4 KCNT, (IDATAS(I), I = 1,KCNT)* 

2*NNOD/10+5 Trailer record 
where : 

JCNT = 190 

KCNT = The integer remainder of the operation NNOD/ 10 
IDATAI = Packed shadow factor word array, infrared 
IDATAS = Packed shadow factor word array, solar 
For example, consider records 3 through 2*NNOD / 104-2 : 

Word 1 contains 9 shadow factors, for cone angles 1 through 9 
at clock angle 1. These shadow factors are for the first node in the node 
array, 

*NOTE; All data records begin and end mth record number, date and time. 
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Words 2 through 19 each contain 9 shadow factors, for cone 
angles 1 through 9, at each clock angle, 2 through 19. Word 19 completes 
a shadow- factor table for node 1. 

Words 20 through 190 are in 19 -word groups identical in 
structure to words 1 through 19. Word 190 completes the shadow-factor 
table for the tenth node in the node array. 

The remaining two data records which exist when NKOD is not a 
multiple of 10, contain tables to complete the set for NWOD nodes. 

Clock angles 1 through 19 range from 0° to 360° in 20° increments 
about the central coordinate system z-axis, (See Figure G-1) The 0° and 
360° points are repeated to avoid wrap-around interpolation. Gone angles 
1 through 9 are the j.nverse cosines of -1.0, -0,75, -0,3, -0,25, 0., 

0.25, 0.5, 0.75, and 1.0, respectively. The shadow factors for nine cone 
angles are packed into one 36-bit word, providing 4 bits per shadow factor. 



ShadoT<7 table point illustrated for 
Cone 5 (90°), Clock 10 (180°). 


Figia?3 C-1 Energy Sourae Direation for Stiadau Factor fables 
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APPENDIX D 

SUBROUTINE DESCRIPTIONS 


Subroutine 

Name 


Page 

Subroutine 

Name 


Page 

ADD 

4 « •# « 

D-2 

NDATA, NDATAS . . 

* « « • 

. D-25 

ADSURF .... 

* 4 4 * 

. D-3 1 

NODDAT ..... 


. D-26 

AQDATA .... 

4 4 * 4 

D-4 

ODATA, ODATAS . . 


. D-27 

BUILDC .... 

* 4 * 4 

D-5 

ORBITl 

« « « * 

. D-29 

CHGBLK .... 

« 4 4 4 

. D-6 

0RBIT2 

* 4 4 4 

. D-30 

CMDATA .... 

p • » * 

D-7 

ORIENT 

« • • » 

. D-31 

DICOMP .... 

• * * * 

D-8 

PLDATA 

4 4 4 4 

. D-32 

DIDTl, DIDTIS . 

4*44 

. D-9 

QODATA 

4 4 4 4 

. D-34 

DIDT2, DIDT2S . 

*■44 

D-IO 1 

QOINIT 

4 4 4 4 

. D-35 

DIDT3, DIDT3S . 

* 4 * 4 

D-11 1 

RBDATA 

* * 4 « 

. D-36 

DITTP, DITTPS . 

• « * • 

D-12 

RCDATA 

• • * • 

. D-37 

DRDATA .... 

* A • 4 

. D-14 

RKDATA 

« « • • 

. D-39 

FFDATA .... 

• * 4 * 

D-15 

1 RSTOFF ..... 

* » « * 

. D-40 

FFNDP .... 

* 4 4 4 

. D-16 

1 RSTON 

* + * « 

. D-40 

GBAPRX .... 

4 « ■ 4 

D-17 

SPIN 

• » * • 

. D-41 

GBDATA .... 

4 « 4 * 

D-18 

STFAQ 

* * * « 

. D-42 

LIST ..... 

# « 4 4 

D-19 

1 SDRFP ...... 

• * « » 

. D-43 

MODAR . . . . . 

* i 4 * 

. D-20 

1 



MODPR' .... 

• 4 4 4 

D-21 




MODPRS .... 

* * * 4 

. D-22 




MODSHD .... 

4*44 

. D-23 




MODTR . . . . 

4 4 * 4 

. D-24 
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SUBROUTINE NAME : ADD 

PURPOSE ; 

This subroutine adds to the problem geometry all nodes/surfaces 
contained in BCSNAM. 

VARIABLE NAME ! 

BCSNAM is a Block Coordinate System name of up to 6 characters. 


RESTRICTIONS ; 

Gall valid only after previous calls to BUXLDC or ADD within current 
step. BCSNAM must be a block coox'dinate system name as defined in surface 
data. 


CALLING SEQUENCE : 

CALL ADD (BCSNAM) 


EXAMPLE ; 

CALL ADD (EXTANK) 


RELATED INFORMATION : 

See BUILD CARD information - Page D-5 


SUBR OUTINE NA >IE: ADSURF 

PURPOSE: 

This subroutine functions to add an adiabatic ^^closure" surface to the 
problem geometry and adds the pertinent form factors to the form factor 


matrix. 



Variable Name; 

Description 

Default Values 

BCSN 

Name of a block coordinate system 
containing the "closure" surface 

None 

NFIGFF 

Configuration name under which modi- 
fied form factor matrix is to be 
stored 

Current configure- 
tion name 

AREA 

Area of adiabatic "closure" surface 

Computed Area based 
on data in Surface 
Data Block 

RESTRICTIONS : 




Block coordinate system BCSN must appear in the surface data block with 
one and only one node (and, therefore, one surface). This surface must be 
completely defined in the Surface Data Block, including the surface properties 
desired for the closure" surface. The concept to simulate an adiabatic condi- 
tion would require a very small IR emissivity. 

In addition it requires for the third argument an area equivalent to the 
smallest possible area required to close out the configuration as a complete 
enclosure. Physically this area may consist of one or more parts, for example, 
the ends of a long cylinder. Only one surface is required since only the 
the true enclosure area is what needs to be preserved- If the last argument 
is zero, the program will use the area computed in the Surface Data Block* 

The dimension of this surface regardless of surface type must be such that the 
computed area will be equivalent to the smallest possible area required to close 
out the configuration as a complete enclosure with one or more areas. 

1- The call to GBDATA subsequent to an ADSURF call must have GBWBND = 2HIR 

2, ACTIVE - Both is not allowed for the adiabatic "closure" surface. 


CALLIN G SE QUENCE; 

CALL ADSURF (BCSN, NFIGFF, AREA) 
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SUBROUTINE NAME: 


AQDATA 


PURPOSE ; 

This subroutine defines parameters used in AQCAL for calculation of absorbed 
heats. Direct fluxes for AQ calculations are obtained from current step data 
storage. 

Variable Names 

lAQGBS - configuration name for solar grey-body matrix* 
lAQGBI - configuration name for IR grey-body matrix* 

RSOLAR “ multiplying factor for solar absorbed heat 
RALB “ multiplying factor for albedo absorbed heat 
RPLAN - multiplying factor for planetary absorbed heat 

RESTRICTIONS : 

Must be called subsequent to a DICAL execution within same step. 

NOTES; If not called prior to an AQCAL execution (within same step), default 
values assumed. Individual default values obtained by passing zero 
arguments , 

CALLING SEQUENCE : 

CALL AQDATA (lAQGBI, lAQGBS, RSOLAR, RALB, RPLAW] 


Default Values 


Current Config. Karae 
Current Config. Name 
1.0 
1.0 
1.0 


*N0TE: If lAQGBS or lAQGBI is input as 4HZER0, the absorbed solar or the 

absorbed infrared fluxes, respectively, ^«ill be set to 0.0. 

The reading of solar or infrared gray body factors x^ill also be 
bypassed so that unused gray body factors need not be calculated. 


RELATED IHFORMATIOM ; 

If a comprehensive printout of absorbed fluxes is desired, the FORTRAN 
statement AQPRNT = YES should appear prior to any L AQCAL card or any ORBGEN 
card (reference Section 4. 3. 7.1). 
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SUBROUTINE NAME ; BUILDC 

PURPOSE; 

This subroutine is used to define as problem geometry all nodes and 
surfaces identified with a Block Coordinate System. BUILDC is the first 
call to define a net? configuration. 

VARIABLE NAME ; 

BCSNAll is a block coordinate system name consisting of up to 6 
characters. (alphanumeric, beginning with a alphabetic character) 

CONFIG is a Hollerith name identifying the current active configure 

tion. 

RESTRICTIONS ; 

Hust be called prior to any Subroutine ADD calls within a step. 
BCSNAM must be ALLBLK, or a block coordinate systems name as defined in 
surface data. C0NFIG must be input as a Hollerith string of up to six 
characters. For example, 5HSHUTL. 

NOTE; If BCSNAM = ALLBLK, all surfaces in the surface data block become 
problem geometry. If C0NFIG = 0 in the first call to BUILDC, the 
configuration name defaults to the run model name input in the 
options data block. C0NFIG must be input in subsequent calls to 
BUILDC. 

CALLING SEQUENCE ; 

CALL BUILDC (BCSNAM, C0NFIG) 

RELATED INFORMATION ; 

Sequences of calls to BUILDC and ADD may be accomplished with one 
card (reference Section 3. 3. 9, 3), formatted as follows: 

CCl CC7 

BUILD FIG,BLK1,BLK2,BLK3 

This is equivalent to the sequence: 

CC7 

CALL BUILDC(BLK1,3HFIG) 

CALL ADD(BLK2) 

CALL ADD(BLK3) 

Note that the configuration name, FIG, must begin to the right of card 
column 6. If a continuation card is required to list all the BCS names 
involved, some character is required in CC6 of each continuation card. 

A BCS name may not be split between cards. 
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SUBROUTINE NAME: 


CHGBLK 


PURPOSE : 

This subroutine allows user to change block coordinate system para- 
meters where: 

BCSNAN - block coordinate system to be changed 
XX " translation along CCS X-axis 
TY - translation along CCS Y-axis 
TZ - translation along CCS Z-axis 

IROTX “ order X rotation is to be performed (IjZjB) 

IROTY - order Y rotation is to be performed (1^2,3) 

IROTZ - order 2 rotation is to be performed (1,2,3) 

ROTX - angle of rotation about CCS X-axis 
ROXY - angle of rotation about CCS Y-axis 
ROTZ - angle of rotation about CCS Z-axis 

RESXICLCXIONS : 

1. XX, XY, XZ, ROXX, ROXY; ROXZ must be floating-point numbers. 

IROTX, IROXY, IROTZ ruuct be integers, 1, 2, or 3 

2. Must be called prior to the applicable BUILDC/ADU sequence. 

CALLING SEQUENCE; 


CALL CHGBLK (BCSNAM, TX, TY, TZ, IROTX, IROTY, IROTZ, ROTX, 
ROXY, ROTZ) 
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SUBRQDTIME NAME : CMDATA 

P URPOSE ; 

This subroutine is used to define parameters used by GMGAL in combining 
form factors according to correspondence data. 


Variable 

Names 

Options 

Default 

Value 

NFIGFF - 

Configuration name for uncombined 
form factor access 

N/A 

Current 

Name 

Gonfig 

NFIGCO - 

Configuration name for form factor 
correspondence data access 

N/A 

Current 

Name 

Config 

NFFTYP - 

Form factor type flag 

2HFF,2HRB 

2HFF 


lAUTOC - 

Flag to apply auto combining data 

3HYES , 2HN0 

3HYES 


CMPRT - : 

Print flag for combined form factors 

3EYES , 2HN0 

3HYES(UNIVAC) 


NOTES : 

If not called prior to a CMCAL execution, default values are used. 


CALLING SEQUENCE : 


CALL CMDATA (NFIGFFjNFIGCO.NFFTYPjlAUTOC.CMPRT) 


SUBROUTINE NAME: 


DICOMP 


PURPOSE ; 

This subroutine is i sed to define logic used in subsequent DICAL 
execution* 


DEFINITIONS ; 
Variable Names 


ISOLFL ^ solar flux 


lALBFL - albedo flux 

compute/stuff 

flag 

IPLAFL planetary flux 
compute/ stuff 
flag 


Options 


Default 


a* 4HZER0 zeros out solar 
flux for all nodes 

b. 0 (integer) - results 
in computation of solar 
fluxes 

c, STEPN (integer step 
number) - stuffs solar 
fluxes from STEPN into 
current step storage 


0 (compute) 


Same as for ISOLFL 


0 


Same as for ISOLFL 


0 


RESTRICTIONS : 

Cannot zero albedo flux if planetary is calculated (and vice versa) . 


NOTES : 

1* Gompute/stuff flags are overridden by the planet shadow. 
Nonzero solar or albedo fluxes will never be stuffed into 
storage for a point within the planet shadow* 

2* Failure to call DIGOMP prior to a DICAL execution results 
in default values for all three flags* 

CALLI NG SEQUENCE : 

CALL DIGOMP (ISOLFL, lALBFL, IPLAFL) 
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SUBROUTINE NAMES ; DIDTl, DIDTIS 

PURPOSE : 

Calls to define dj.rect irradiation shadowing and accuracy parameters and 
to compute heat source position vectors fi'ora true anomaly or time. 

DEFINITIONS : 


Variable Names 

Default Values 

DINOSH - shadox?/no shadow flag (Options: 4KN0SH, 4HSHAD) 

4HSHAD (shadow 
calculations not 
bypassed) 

DIACC - element selection accuracy factor for node /planet 
form factors 

0.25 

DIACCS - element selection accuracy factor for shadowing 
calculations 

0.10 

TRUEAN - true anomaly. If TIMEPR is entered TRUEAN will be 
computed 

NSPFF - step number reference to obtain node-planet form 
factors if desired 

None 

0 (new form 
factors computed) 

TIMEPR - time 

None 

DIPNCH - flux punch flag (Options: 3HYES, 2HN0> 4HTAPE* 

2HN0 

ISFAC - flag to write shadow factor on RSO for printout on 
subsequent runs (Options: 3HYES, 2FN0) 

2HN0(CDC) 

3HYES(UNIVAC) 


RESTRICTIONS : 


Either TRUEAN or TIMEPR must be defined in call. 

CALLING SEQUENCE : 

CALL DIDTl (DINOSH, DIACC, DIACCS, TRUEAN, NSPFF, TIMEPR, DIPNCH, ISFAC) 
CALL DIDTIS (TRUEAN, NSPFF, TIMEPR, DIPNCH, ISFAC) 


NOTE; 


* writes BCD output, with line numbers to USERl file in Flux Data Block input 
Format. 
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SUBROUTINE NAMES : DIDT2, DIDT2S 

PURPOSE ; 

Calls to define direct irradiation shadowing and accuracy parameters and 
to compute heat source position vectors from look angles. 

DEFINITIONS : 

DINOSH 
DIACO ] 

DIACCS 

NSPFF Reference DIDTl 

DIPNCH \ 

ISFAC I 

SUNCLj SONCO - look angles to sun (clock, cone) in the VCSi^ 

PLCL, PLCO - look angles to planet (clock, cone) in the 
TIMEPR - present time 
ALT - spacecraft altitude 

NOTE: * Allowable ranges of SUNCL, PLCL are 0 to 360 degrees. 

** Allowable ranges of SUNCO, PLCO are 0 to 180 degrees. 


RESTRICTIONS : 

These calls must be prr ceded by a call to ORBITl or 0RBIT2. The purpose 
is to define the orbit -centered body and set the variables PRAD, SOL, PALB, 
WDS and WSS. A call to 0RIENT is required if the CCS and the VCS are not 
coincident. 

Subroutine SPIN should not be used with DIDT2 or DIDT2S. 

CALLING SEQUENCE ! 

CALL DIDT2 (DINOSH, DIACC, DIACCS, NSPFF, SUNCL, SUNCO, 

PLCL, PLCO, TIMEPR, ALT, DIPNCH, ISFAC) 

CALL DIDT2S (NSPFF, SUNCL, SUNCO, PLCL, PLCO, TIMEPR, ALT, PIDNCH, ISFAC) 
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SUBROUTINE NAME ; DIDT3, DIDT3S 

PURPOSE ; 

These subroutines are used to define and update direct irradiation 
parameters when using the planet surface option. 

DEFINITIQNS : 

Variable Names Default Value 


DINOSH - shadow/ no shadow flag (Ref. DIDTl) 4HSHAD 

DIACCS - element selection accuracy factor for shadowing 0,1 

ITOD - time of day (military time), integer (e.g., 1435) None 

DIPNCH - flux punch/ no punch flag (Ref. DIDTl) 2HN0 

ISFAC - flag to write shadow factors on RSO (Ref. DIDTl) 2HN0(CDC) 

RpfiTRTnTTnws • 3HVES (UNIVAC) 


Must be preceded by a call to subroutine SURFP. 

CALLING SEQUENCE : 

CALL DIDT3(DIN0SH, DIACCS, ITOD, DIPNCH,ISFAC) 

CALL DIDT3S (ITOD, ISFAC) 

NOTES r 

1. Use the statements TIMEPR = DAWN and TIMEPR = DUSK in the operation 

data to set current time to sunrise time and sunset time, respectively. 

DIDT3 and DIDT3S CANNOT be used with DAITO or DUSK as the first 
argument. The sequence: 

DIDT3 (4HNOSH, .05,0,0,0) 

TIMEPR = DAWN . 

is required to set DINOSH, DIACCS and TIMEPR if the time desired 
is DAWN. 
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SUBROUTINE NAMES ; DITTP, DITTPS 

PURPOSE ; 

These subroutines read data from a trajectory tape and define space- 
craft/heat source parameters through subroutine DIDTZ. DITTP is called 
initially in order to define planetary parameters and position the tape for 
subsequent time points. DITTPS is used to update time and attitude/position 
data. 


DEPINITIONS; 


Variable Names 

TINE - mission time 

ITYPE - identifier for special event record 

PLANAM - name of orbit-centered planet (if applicable) 
(ref ORBITI) 


IDWDN 

FIDEN 

NTIM 

NTYPE 

NCLPL 

NCOPb 

NGLS 

NCOS 

KRAD 

NWOR 

ALTMP 


number of word FIDEN in identification record 

file identification word 

number of time word in information record 

number of word ITYPE in information record 

number of word containing clock angle-to- 
planet vector 

number of word containing cone angle-to- 
planet vector 

number of word containing clock angle-to- 
sun vector 

number of word containing cone angle-to- 
sun vector 

number of x<ord containing planet center-to- 
spacecraft distance 

number of words in tape record 

multiplying factor to convert units of NRAD 
word to feet 


Options 
Real no. 

Integer 

Hollerith 

Integer 

Hollerith 

Integer 

Integer 

Integer 

Integer 

Integer 

Integer 

Integer 

Integer 
Real no. 






■ I 
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Variable Names Options 

IBOD "" one -body /two-body flag integer 

0 - One-body tape 

1 - T^-Jo^body tape, use body 1 

2 - Two-body tapa^ use body 2 

DIPNCH - Punch/no punch flag for orbital flux output Hollerith 


RESTRICTIONS ; 

a. Calls to DITTPS to update time and type can be made only after 
a call to DITTP is in effect. 

b. The TIME argument in DITTPS calls must be greater than any pre- 
viously defined TIME argument until the tape is repositioned 
through a call to DITTP* 


CALLING SEQUENCES ; 

CALL DITTP (TIME, ITYPE, PLANAM, IDTON, FIDEN, NTIM, NTYPE, NCLPL, 
NGOPL, NCLS, NCOS, NRAD, NWOR, ALTMF, IBOD, DIPNGH) 


CALL DITTPS (TIME, HYPE) 
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SUBROUTINE NAJ^IE : BRDATA 

PURPOSE : 

This subroutine is used to define parameters used by DRCAL in computing 
direct irradiation with real body effects* 


Variable Names 


Options 


Default Values 


NSTPDI “ step member for flux data 
access 


Integer 


Current step no* 


DIACCS - accuracy parameter for flux 
shadowing 


Reference DIDTl 


0.1 


NOTES ; 

If not called prior to DRCAL execution, default values are used. 


CALLING SEQUENCE : 

CALL DRDATA (NSTPDI, DIACCS) 
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SUBROUTINE NAtlE ; FFDATA 

PURPOSE; 

This subroutine will define parameters used in FFCAL if other than 
default values are used. 

DEFINITIONS ; 

Variable Name Default Values 


FFACC - orientation accuracy factor 0.05 

FFACCS - shadowing accuracy factor 0.1 

FFNOSH - shadowing override flag (4HN0SHj 4HSHAD) 4HSHAD 

FFRATL - distance/area ratio factor 15.0 

FFMIN - eliminate small form factors l.E-6 

FFPRNT - flag to print form factors (BHYES, 

2HNO) 3HYES 

FFPNCH - flag to punch form factors (3HYES,2HN0,4HPALL*,4HTAPE**) 2HN0 
FFNAC - node array check flag (3I1YES , 2HN0) 3HYES 


RESTRICTIONS : 

None 

NOTES: Example: CALL FFDATA (0., 0., 4HN0SH, 0, l.E-3, 0, 3HYES, 3HYES) 

Results in no shadowing computations, form factors below 0.001 
ignored, form factors printed and default values used elsewhere. 

If value passed is zero, default value assumed. 

CALLING SEQUENCE : 

CAT.T. FFDATA (FFACC, FFACCS, FFNOSH, FFRATL, FFMIN, FFPRNT, FFPNCH, 

FFNAC) 

* 4HPALL will punch all form factors (tfNIVAC version) 

*'•’ Writes form factor output to the USERl file in form factor data 
block format. 

RELATED INFORMATION : 

1. The statement IFFSIIO = 2HN0 prior to a call to the FFCAL link will bypass 
Form Factor computations to BFADOI^ER only nodes, IFFSHO defaults to 3HYES. 

2. FFPNCH defaults to punch calculated form factors if RSO tape is not 
specified. 
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SUBROUTINE NAME ; FFNDP 
PURPOSE ; 

This subroutine is used to obtain a node number array, punched on 
cards in format used in form factor, flux data, and Shadow Factor data blocks, 

RESTRICTIONS : 


None 

CALLING SEQUENCE : 
CALL FFNDP 
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SUBROUTINE NAI^IE: 


GBAPRX 


PURPOSE: 

This subtoutine calculates gray-body radiant interchange factors 
using an approximate relationship and stores the results in data storage • 
Uses form factors and optical properties stored under current configura- 


tion name. 




Argument Name 

Description 

Options 

Default 

GBTOND 

Waveband definition 
name 

2HIR, 3HS0L 
4HB0TH 

4HB0TH 

NFIGFF 

Configuration name for 
form factor access 


Current Config, 1 
Name i 

NFFTYP 

Form factor type to be 
used in GB calculations 

2HFF,2HCM 

Last type calcu- 
lated under CFIGFF 

NOTE: 




1, Input 

zero for default action. 




2, Grey body factor computed according to: 

where: Fij = form factor from i to j 

= infrared or solar absorbtivity, i. 
= infrared or solar absorbtivity, j 

RESTRICTIONS ; 


^ and ^ should be greater than . 9 to reduce errors resulting from 
ignoring reflected radiation, unless configuration is generally "open".| 


CALLING SEQUENCE ; 

GALL GBAPRX (GBl^BND, 6HNFIGFF, NFFTYP) 
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SUBROUTINE NAME; GBDATA 


PURPOSE : 

Defines parameters used by segment GBCAL in computing a grey-body 
factor matriK. 


Variable Names 


Default Value 


GBWBND - Waveband definition name (2HIR, SHSOLj 4HS0TH) 4HB0TH 


NFIGFF - Configuration name for form factor access 


Current Config. 
name 


NFFTYP - Form factor type to be used In GB calculations 
Options: 2HFF, 2HRB, 2HCM 


Last type cal- 
culated under 
NFIGFF 


CALLING SEQUENCE : 

CALL GBDATA (GBliBND, 6HNFIGFF» NFFTYP) 


RESTRICTIONS ; 

1, GBDATA must be called prior to calculating gray body factors. 

2- Do not use a GBWBND of 3HS0L or 4HB0TH when used in conjunction with 
a call to ADSURF. 
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SUBROUTINE NAME : LIST 

PURPOSE : 

This subrouclne used to obtain printed listing of data on BCDOU 
and/or USERl tapes. 


Variable Names: 

Options 

Default 

NAJEF 

- Na'ne of tape to 
be listed 

BCDOU, USERl, 
BOTH 

BOTH 

N 

- Number of files 
to be listed 

integer, SHALL 

None 


NOTE : 

1. Call valid after writing data to BCDOU from RCCAL, RKCAL 
and/or QOCAL, or after witing data to USERl from FFCAL 
and/or DICAL. 

CALLING SEQUENCE : 

CALL LIST (NAMEF, N) 

RESTRICTIONS : 

Do not call Subroutine LIST until all writing to NAMEF Tape/file 
has been completed. 
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SUBROUTINE NAME; MODAR 


PURPOSE; 


This subroutine changes the area of a designated node, or changes the 
area of all currently active nodes by use of a multiplier. 


Areument Name 

Description 

Options 

Default 

ND 

Node number 
designator 

a. Any active node 
number (integer) 

None 



b. 3HALL 


AR 

Desired value 
for area 

a* Floating-point 
data value 

None 



b. Area multiplier^ 



(SHALL option 
only) 

NOTE ; 

1. liJhen ND = SHALL, all active node areas are modified according to: 
AREA = AREA*AR, 


RESTRICTIONS ; 

1. Call not valid prior to geometry definition through calls to BUILDC 
and ADD. 

2. MODAR calls are cancelled by a subsequent BUILDC/ADD Sequence Areas 
revert to those surface data. 


CALLING SEQUENCE ; 

CALL MODAR (ND, AR) 

RETATRD INFORMATION : 

See Subroutine NODDAT - page D-26 
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SUBROUTINE NAME : MODFR 

PURPOSE ; 

This subroutine modifies the diffuse infrared emissivity and/or 


the diffuse solar 

absorptivity of 

a designated node* 


Areument Name 

Description 

Options 

Default 

ND 

Node number 

Any active 

None 


designator 

node number 


ALPHA 

Diffuse solar 

a. 0. < DV< 1. 

None 


absorptivity 

b. DV<0. 


EMISS 

Diffuse IR 

a, 0.< DV< 1, 

None 


emissivity 

b. DV<0. 



NOTE ; 

1. If ALPHA<C0, or EMISS<[0., current values are not changed. 


RESTRICTIONS ; 

1. Call not valid prior to geometry definition through calls to BUILDC 
and ADD. 

2. MODPR calls are cancelled by a subsequent BUILDC/ADD sequence. Properties 
revert to those in surface data. 


CALLING SEQUENCE ; 

CALL MODPR (ND, ALPHA, EMISS) 
RELATED INFORMATION ; 

See Subroutine NODDAT - Page D-26 
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SUBROUTINE NAME: 


MODPRS 


PURPOSE ; 

This subroutine modifies the solar and/or infrared specular reflect- 
ivity of a designated node. 


Ar^ment Name 

Descrip tion 

Options 

Default 

ND 

Node number 
designator 

Any active 
node number 

None 

SPRS 

Specular reflectivity , 
solar 

a. 0. < DV < 1. 

b. DV<0.^ 

None 

SPRI 

Specular reflectivity j 
infrared 

a. 0. < DV < 1. 

b. DV<0.^ 

None 


HOTF^ - 

1. If SPRK^O. or SPRS<C0., current values are not changed. 

RESTRICTIONS ; 

1. This call applicable only to nodes defined as specular reflectors 
in the surface data block. 

2. Call not valid prior to geometry definition through calls to BUILDC 
and ADD. 

3. MQDPRS calls, are cancelled by a subsequent build card or BUILDC/ADD se- 
quence. Properties revert to those in surface data. 


CALLING SEQOBHCE : 

CALL MODPRS (ND, SPRS, SPRI) 
RELATED INFORMATION ; 

See Subroutine NODDAT - Page D-26 
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SUBROUTINE MAMS : MODSHD 

PURPOSE ; 

This subroutine modifies the SHADE/BSHADE flags for a designated 
surface. 


Argument Name 

Description 

Options 

Default 

ISR 

Surface number 
designator 

Any active 
surface number 

None 

SHADE 

"Can shade" flag 

FF, DI, BOTH, 

no; 

None 

BSHADE 

"Can be shaded" flag 

FF, DI, BOTH, 
NO, 0^ 

None 


1. Xf SHADE or BSHADE data values are sero, their valuer are not changed. 

2. Shade flag changes affect entire surface. 

RESmCTlONS : 

Call not valid prior to geometry definition through calls to BUILDG and 

ADD. 

Call not applicable to shadower-only surfaces. 

Calls to MODSHD are cancelled by a subsequent build card or BUILDC/ADD 
sequence. Properties revert to those in surface data. 

CALLING SEQUENCE : 

CALL MODSHD (ISR, SHADE, BSHADE) 
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SUBROUTINE NAME; 


MODTR 


PURPOSE: 


This subroutine modifies the solar and/or infrared transmissivity 
of a designated surface. 


Argument Name 

Descriotion 

Options 

Default 

ISR 

Surface number 
designator 

Any active 
surface number 

None 

TRANS 

Solar transmissivity 

a. 0. < DV< 1. 

None 



b, DV<0.^ 


IRANI 

IR transmissivity 

a. 0. < DV< 1. 

None 



b, DV<0.^ 



NOTES: 

1, A negative TRANS or IRANI should be used if two TElASYS surfaces are input for one 
semitransparent body. This avoids having the shaaow factors multiplied by 

the SQUARE of the Transmissivity. The program will use the SQUARE root of 
the Transmissivity if the user eaters the transmissivities with a negative 
sign (Ref. Section 4) . 

2. Transmissivity changes affect entire surface. 

RESTRICTIONS ; 

Call not valid prior to geometry definition through calls to BUIJjDC and 

ADD. 


Calls to MODTR are cancelled by a subsequent BUILDC/ADD sequence. 
Properties revert to those in surface data. 


CALLING SEQUENCE ; 

CALL MODTR (ISR, TRANS, IRANI) 
RELATED INFORMATION ; 

See Subroutine NODDAT - Page D-26 
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SUBROUTINE NAMES ; NDATA, NDATAS 

PURPOSE: 


These subroutines may be called prior to a call to the node plotter 
segment to define optional views and miscellaneous parameters where: 


Parameter 

Description 

Options^ 

Default 

NV 

View number 

1-6 

1 

VU 

View 

SHALL, 3H3-D 

1HX,1HY,1HZ 

3HGEN 

SHALL 

SCL 

Scale 

Floating-point no. 

Automatic scale 

NACT 

Flag for plotting active 
side of arrows 

2HN0, 3HYES 

2HN0 

ISHO 

Flag to plot sb.adower'-only 
surfaces 

2HN0, 3HYES 

2HN0 1 

SELN 

Name of array coo.talrLing 
identification numbers of 
nodes to be selectively 
plotted 

Array name 

Plot all nodes 

TIT 

Array name of plot title 

Array name (array 
length 66 charac- 
ters max.) 

Uses job 
title 

IROTX, IROTY 
IROTZ 

Order of rotations (for 
VU = 3HGEN) 

1,.1,3 (any order) 

1,2,3 

ROTX, ROTY 
ROTZ 

View rotations (for VU = 
3HGEN) 

Real no. 

0.0,0, 0, 
0.0 


* Input zero for default action 

NOTE: The NV parameter allows the user to define up to 6 plot operations 

that will be executed with one NPLOT call. Later in execution, 
(after a geometry change, for instance), he can execute the same 6 
operations or change one or more by reference to the appropriate NV 
before his NPLOT call. 

RESTRICTIONS ; 

None 

CALLING SEQUENCE : 

GALL NDATA (NV, VU, SCL, NACT, ISHO, SELN, TIT, IROTX, IROTY, IROTZ, 
ROTX, ROTY, ROTZ) 

CALL NDATAS (NV, VU, SCL, NACT, ISHO) 
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SUBROUTINE MME: 


NODDAT 


PURPOSE ; 

This routine may be called at any time from the operations data block to 
print nodal areas and surface optical properties. This routine is particu- 
larly useful following calls to the "MOD” routines. 

RESTPJIGTIOHS ; , 

May be called at any time after a model has been defined by calls to 
"BUILDC" and "ADD", or using the "BUILD" card. 

OAT.T.TNC SEOTIENCR ; 

CALL NODDAT 
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SUBROUTINE NAMES ; ODATA, ODATAS 

PURPOSE ; 

These subroutines may be called prior to a call to the orbit plotter 
to define optional views and miscellaneous parameters where: 


Parameter 

Description 

Options* 

Default 

wv 

View number 

1-6 

1 

vu 

View 

SHALL, 3H3-D, 
4HBETA, 5HCIGMA, 
3 ISDN, 3HGES 

3 HALL 

SCL 

Spacecraft size meas*" Real no* 
ured from CCS origin 
in plot frame dimensions 

Computed 

automatically 

SCLR 

Orbit radius in 
plot frame dimensions 

Real no . 

Computed 

automatically 

RPLN 

Planet radius in 
plot frame dimen- 
sion 

Real no . 

1*4 inches 

TRUE AN 

True anomaly 

Real no. 

None 

TINEST 

Time of periapsis 
passage 

Real no. 

None 

TIME 

Present time 

Real no . 


SEEN 

Name of array con- 

Array name (array 

Plots all 


taining surface 

length 66 charac- 

surfaces 


numbers to be 
selectively plotted 

ters, max.) 

defines as 
shadowers 

TIT ‘ 

Array name of plot 

Array name 

Uses job 

• 

title 


title 

IROTX, IROTY, 
IROTZ 

Order of rotations 
(for view — 3HGEW) 

1,2,3 (any order) 

1,2,3 

ROTX, ROTY, ROTZ 

View rotations to 
rotate plotter ref- 
erence coordinate sys- 
tem (see i.“^ure 4-2 on 
P* 4-10) into user^s 
desired view. 

Real no . 

0.0, 0.0, 0.0 


*Input zero for default action 

The NV parameter allows the user to define up to 6 plot operations that 
x^ill be executed xd-th one OPLOT call. Later in execution (after a geometry 
change, for ins trace), he can execute the same 6 oper'etions or change one or 
more by reference to the appropriate NV before this OPLOT call. 


D-28 


SUBROUTINES ODATA, ODATAS (CONT’D) 

RESTRICTIONS : 

Calls valid only after orbit has been defined. 

CALLING SEQUENCE : 

CALL ODATA (NV, VU, SCL, SCLR, RPLN, TRUEAE, TIMEST, TIME,SELN, 
TIT, IROTX, IROTY, IROTZ, ROTX, ROTY, ROTZ) 

CALL ODATAS (NV, VU, SCL, SCLR, RPLN, TRUEAN, TIMEST, TIME) 


SUBROUTINE NJaffi; 


ORBITl 


PURPOSE ; 

This subroutine defines spacecraft orbits in terms of classic orbital 
mechanics parameters and a celestial coordinate system. 

DEFINITIONS ; 


Variable Names 


Default Values 


PNAME - name of orbi.;-centered body 

ALAN - longitude of ascending node 

APER - argument of perifocus 

OINC - orbit inclination 

TIMEST - time of periapsis passage, hours 

HP - altitude at periapsis 

HA - altitude at apoapsis 

ECO - orbit eccentricity 

SUNRA - right ascension of sun 

SUNDEC “ declination of sun 

STRRA - right ascension of star 

STRDBC - declination, of star 


None 

NwHe 

None 

None 

0.0 

None 

None 

None 

None 

None 

None 


RESTRICTIONS : 


CALLING SEQUENCE : 


CALL ORBITl (PNAME, ALAN, APER, OINC, TIMEST, HP, HA, SUNRA, SUNDEC, 
STREA, STRDEC) 

CALL ORBITl (PLANAM, ALAN, APER, OINC, TIMEST, HP, ECC, SUNRA, SUNDEC, 
STRRA, STRDEC) 

NOTES ; 

PNAME options are as follows; 3HMER, 3HVEN, SHEAR, 3HM00, 3HMAR, 
3HJUP, 3HSAT, 3HNEP, 3HURA, and 3HSUN. These names are used to key 
the following program variables ; 

NDS — darkside infrared emissive power at planet surface 
PALB - planet albedo value (solar reflectance) 

PRAD - planet radius 

WSS - infrared emissive power at sbusolar point 
SOL — solar ’’constant" • planet-sun distance 
GRAV - planet gravitational constant at surface 

Sixth argument is tested for magnitude. If ^1.0, ECC is assumed. 

If >1.0, HA assumed. 

Execution of this subroutine defines the planetary shadow entry and 
exit points (ref Figure A-7) . 

RELATED INFORMATION ; 

Refer to Figure 4.3 and Figure 4.4 for definition of terms. 
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SUBROUTINE NAME; 


0RBIT2 


PURPOSE : 

This subroutine defines spacecraft orbits and sun/star position-orbit 
relationship in the orbit coordinate system. 

DEFINITIONS : 


Variable Names Default Values 


PNAME 

- 

name of orb it*- centered body 

None 

CIGMA 


clock angle - X axis to solar vector 
projection ^ 

None 

BETA 

- 

cone angle - 2^ axis to solar vector 

None 

CIGMAS 


clock angle - X axis to star vector 
projection 

None 

BETAS 

-* 

cone angle - 2^ axis to star vector projection 

None 

TIMEST 


time of periapsis passage, hours 

0-0 

HP 


altitude of periapsis 

None 

HA 

- 

altxttide cf apcapars 

None 

EGG 

— 

orbit eccentricity 

None 

RESTRICTIONS: 



None 


CALLING SEQUENCE : 

CALL ORBIT2 (PNAME, CIGMA, BETA, CIGMAS, BETAS, TIMEST, HP, FA) 

CALL 0RBIT2 (PNAME, CIGMA, BETA, CIGMAS, BETAS, TIMEST, HP, ECC) 

NOTES: See subroutine OEBITl. This call not applicable to heliocentric 

orbits. 

RELATED INFORMATION ; 

Refer to Figures 4.3 and 4.5 for definition of terms. 
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SUBROUTINE NAM5: 


ORIENT 


PURPOSE : 


To define spacecraft orientation relative to orbital heat sources. 
DEFINITIONS; 


Variable Names Default Values 

TYPE ” orientation type None 

IROTX - order of rotation about x-axis 1 

IROTY - order of rotation about y-axis 2 

IROTZ -- order of rotation about z-axis 3 

ROTX - rotation about VGS x-axis to rotate VCS into CCS 0* 

ROTY - rotation about VGS y-axis to rotate VCS into CCS 0, 

ROTZ - rotation about VGS z-axis to rotate VCS into CCS 0* 


RESTRICTIONS : 

Not recommended for use with DXDT 23 DIDT2S- A call to 0RIENT must 
precede a call to DIDTl or DIDTIS. 

CALLING SEQUENCE ; 

CALL ORIENT (TYPE, IROTX, IROTY, IROTZ, ROTX, ROTY, ROTZ) 

NOTES: TYPE options are as follov7s: 4HPLAN, 3HSUN, 4HSTAR, 4HTAPE* 

Individual default values obtained by passing zero. 

RELATED INFORMATION : 

Refer to Figure 4.6 for definition of terms. 
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SUBROUTIME NAME; PLMTA 


PURPOSE; 


This subroutine 

defines parameters 

necessary to execute the data plotter. 

DEFINITIONS ; 

Variable Name 

Description 

Options 

Default 

IPLUNT 

Plot data flag 
(a composite 
Hollerith word) 

Letter 1; A - Absorbed None 

I - Incident 
Letter 2: F - Fluxes 
R - Rates 

Letters 3,4, 5, & 6 (as 
required) 

£> - Solar 
A - Albedo 
P - Planetary 
T - Total (Sum of SAP) 
ALL - All 

IPLSN 

. 

Identifies steps 
to be plotted 

A. 3HALL 

B, Name of Array of step 
numbers- Steps do not 
have to be in any order 

SHALL 

IPLNA 

Identifies nodes 
to be plotted 

A. 3HALL 

B. Name of Array of node 
numb ers 

3HALL 

PLCRVF 

Flag for curve- 
fitting 

3HZES, 2HN0 

3HYES 

PLLABX. 

Plot label X 

Array name (array length 
28 characters max.) 

Blanks 

PLLABY 

Plot label Y 

Array name (array length 
28 characters max.) 

Blanks 

PLTITl 

Plot label title 
line 1 

Array name (array length 
58 characters maxO 

Blanks 

PLTIT2 

Plot label title 
line 2 

Array name (array length 
70 characters max*) 

Blanks 

PLXMPF 

X-axis multiplying 
factor 

Real no • 

1.0 

PLYMPF 

Y-axis multiplying 
factor 

K6al no* 

1.0 

PLGMB 

Plots output when 
C or res p ondence 
applied 

3BYES , 2HN0 

2HN0 
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EESTRIGTIOMS: None 


NOTE ; 

a- Examples of IPLUNT; 

SHARP; plots absorbed rates, planetary 
SHIFALL; plots all incident fluxes 

5HAFSAP; plots solar ^ albedo and planetary absorbed fluxes 

b. Any set of dependent* and independent-variable data pairs may be 
plotted if IPLUNT = 1 and the data are written to disc/drum unit 1 
in advance (reference Section 5*1,4). 

CALLING SEQUENCE ; 

CAT.T , PLDATA (IPLTJKT, IPLSN, IPLNA, PLCRTIFj, PLLABX, PLLABY, PLTIXl, 
PLTIT2, PLXMPP, PLYMPF, PLCMB) 


SUBROUTINE NAME; 


qODATA 


PURPOSE ; 

This subroutine used to define the absorbed heat output format to 
be obtained front the subsequent QOCAL execution. 

DEFINITIONS ; 

Variable Names Default Value 


NSARRY 

NTMARY 

qotape 

QOPNCH 

QOA>IPF 

QOFMPF 

QOTMPF 

QOTYPE 


- array of step numbers where absorbed Q data is 
stored. Any order allowed. Options: array name, SHALL 

- thermal analyzer time array number (Q arrays 
numbered consecutively from NTMARY + 1) 

- BCDOU tape output flag. Options: 4HTAPEj 2HN0 

- punch output flag. Options; 3HPUN, 2HN0 


SHALL- 

1 

2HN0 

3HPUN (GDC) 
2HN0(DNIVAC) 


- area multiplication factor 

- energy multiplication factor 
“ time multiplication factor 

- type of output flag. Options: 3HTAB for Q vs 

time tables, 2HAV for orbital average Q data, 
4HB0TH for both 


1.0 

1.0 

1.0 

4HB0TH 


" See Subroutine QOINIT 
RESTRICTIONS 

Current geometry definition must agree with geometry of all steps 
in NSARRY. 


NOTES ; 


Sort is made to obtain monotonically increasing time array. Trape- 
zoidal-rule average made for orbital average heat tables. 

QOAMPF applies only to areas on thermal analyzer subroutine call output. 
QOFMPF applies only to heat flux array output. 

QOTMPF applies to time array output and to value of period on subroutine 
call output, ' 

CALLING SEQUENCE : 

CALL QODATA (NSARRY, NTMARY, QOTAPE, QOPNCH, QOAMPF, QOFMPF, 

QOTMPF, QOTYPE) 
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SUBROUTINE NAME : QOINIT 

PURPOSE ; 

This subroutine rewinds the absorbed heat (NTQ) data storage file, thus 
providing user control of the number of time points obtained with NSARRY = 
SHALL in subroutine QODATA. This will make previously stored absorbed heat 
data inaccessible to the absorbed heat output (QOCAL) segment, 

CALLING SEQUENCE : 

CALL QOINIT 

RELATED INFORMATION ; 

See Subroutine QODATA. 
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SUBBQUTIME MME ; RBDATA 

PURPOSE ; 

This subroutine is used to define parameters used by RBCAL in computing 
£orn factors *with real<-body radiation effects* 

Variable Names Default Value 


NFIGfF - Configuration name for form factor access 


Current config. 
name 


FFACC' 


A 

! 

FFACC? / 


FFRATL 

FFPRMT 


rj 


Reference FFDATA 


NOTES : 

1. If not called prior to RBCAL execution, default values are used. 
Z. Must utilize uncombined Form Factor. 


CALLING SEQUENCE! 


CALL RBDATA (NFIGFF, FFACG, FFACCS, FFRATL, FFPRNT) 
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SUBROUTIME NAME; RCDATA 


PURPOSE; 


This is a user-called subroutine that defines the parameteirs 
for the condensation and output of radiation conductors (RADKS) . 


VARIABLE DESGRIPTIQMS AMD DEFAULT VALUES ; 

Variable Descrip blon 

NFIGGB Configuration name for gray body factor access 


RKPNCH 

RKMIN 


IRKCN 

RKSP 

IRKNSP 

SIGMA 

RKAMPF 

RKTAPE 

NFIGCO 


Punch/ no punch flag. Options: 3HPUN, 2HN0 

Minimum value that will result in a valid 

RADK. RKMIN TEST is not made on conductors to the 
space node. If NERN is POSITIVE the RKMIN test is 
applied to the sum of those connections discarded 
after the RFRAC requirement is satisfied. 

Initial radiation conductor number 

Flag for caluclation of RADKS to space. 

Options: 5HSPACE, 2HN0 

Space node number 

Stefan-Boltzmann constant 

Area multiplying factor 

Flag to write RADKS to BCD tape. Options; 

4HTAPE, 2HN0. See Subroutine LIST for 
Related Information. 

Configuration name for correspondence data access 


RFRAC 

RTOL 

NERN 

IPRIME 

ISECND 


Significant radiation fraction; radiation con- 
ductors of a node to be left intact divided bv 
the sum of the node conductors 

Percentage of SLAST (last conductor value saved to 
meet RFElAC criterion) . Subsequent conductors will 
be saved if their values are greater than 
RTOL * SLAST. 

Effective radiation node (ERN) number. If NERN 
is negative, all ERN conductors will be printed 
but not punched nr written to tape. 

Array name for array of primary MESS node 
numbers and special node numbers 

Array name for array of secondary MESS node 
numbers 


used in RCCAL 


Default Value 

Current Config. 
Name 

3HPUN 

0.0001 


1 

2HN0 

32767 

1.713E-9 

1.0 

2HN0 

Current config. 
name 

0.7 

0.99 


None 

None 

None 
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RESTRICTIONS : 

RCDATA must be called prior to RGCAL execution since all of the variables 
are not defaulted. 


IPRIME and ISECND arrays must be input in the array data block to 
specify MESS node pairs and special nodes. IPRIME contains a list of all 
primary MESS nodes and all special nodes in that order. ISECND contains a 
list of all secondary MESS nodes in IPRIME. 

CALLING SEQUENCE : 


I 


GALL RCDATA fNFIGGB, RKPNCH, RKMIN, lEKCN, RKSP, IRKNSP, SIGMA, 
HCAMPF, EKTAPE, NFIGCO, EFRAC, RTOL, NERN, IPRIME, ISECND) 
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SUBROUTINE NAME ; EKDATA 

PURPOSE ; 


This subroutine defines parameters used in RKGAL for output of radiation 
conductors (RACKS). 

Variable Names Default Value 


NFIGGB 

RKPNCH 

RKMIN 

IRKCN 

RKSP 

IRKNSP 

SIGMA 

RKAMF 

RKTAPE 

NFIGCO 


Configuration name for gray body factor access 


Current Config. 
name 


Punch/no punch flag. Options: 3HYES, 2HNO 3HYES 

Minimum value of ^ /e that will result in a valid 0.0001 
RADK. Test not applied to conductors to space nodes. 

Initial radiation conductor number 1 

flag for calculation of RACKS to space. 2HN0 

Options; 5HSPACE, 2HN0 

Space node number 32767 

Stefan-Boltzmann constant 1.713E-9 

Area multiplying factor 1.0 

Flag to write RADKS to BGDOU tape. Options: 4HTAPE 2HN0 

4HTAPE, 2HN0. See Subroutine LIST for Related 
Information 


Configuration name for correspondence data access 


Current Config. 
name 


NOTES: If not called prior to RKCAL execution, default values will be 

assumed. Individual default values obtained by passing zero 
arguments. 


CALLING SEQUENCE ; 

CALL RKDATA (NFIGGB, RKPNCH, RKMIN, IRKCN, RKSP, IRKNSP, SIGMA, 
RKAMPF, RKTAPE, NFIGCO) 
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SUBROUTINE NAME; RSTOFF 


PURPOSE; 


This subroutiae is used to discontinue the reading of data from 
an RSI tape during a restart run* All operations following a call to 
this routine are performed as though it was not a restart run, 

RESTRICTIONS : 

Call valid only during a restart run from an RSI tape* 

CALLING SEQUENCE : 

CALL RSTOFF 

SUBROUTINE NAME ; RSTON 
PURPOSE : 

This subroutine is used to re-establish the reading of data from 
an RSI tape following a call to RSTOFF^ 


RESTRICTIONS ; 

Call valid only during a restart run from an RSI tape* 
CALLING SEQUENCE: 


CALL RSTON 


NOTE: 


The judicious use of RSTOFF in conjunction with RSTON allows the 
user to insert, delete, and/or recalculate any operations in his 
Operations Data Block, 
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SUBROUTIME NAME ; SPIN 

PURPOSE ; 

Subroutine to define spacecraft spin rate, spin axis, and time of 
beginning of spin. 

DEFINITIONS : 

Variable Names Default _Valu^ 

CLOCK - clock angle - CCS x-axis to spin axis projection 0 , 

CONE - cone angle - CCS z-axis to spin axis 0 . 

RATE - spin rotation rate, revolutions/hour (positive clock- 0. 

wise as viewed along spin axis from origin) 

TRDANS - true anomaly where spin begins 0 . 

SPNTM - time corresponding to TRUANS 0 • 

RESTRICTIONS ; 

Must be called subsequent to orbit definition through subroutines 
ORBITl or 0RBIT2. 

Subroutine spin cannot be used in conjunction with 0BB6EN options INER 
and CIRP, and RATE not equal to zero. 


MOTES : 

a. The time at which spin begins may be defined either directly through 
SPNTM or through TRUANS. If SPNTM = 0, SPNTM is computed from TRUANS. 

b. Spinning may be stopped only by a call to subroutine SPIN with RATE = 0. 
and spin stop time or true anomaly defined. 

CALLING SEQUENCE ; 

CALL SPIN (CLOCK, CONE, RATE TRUANS, SPNTM) 
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SUBROUTINE NAME; 


STFAQ 


PURPOSE ; 

This subroutine stuffs known values of direct flux and absorbed heat from 
a previously executed step into current step data storage. It also defines time 
of current step, either directly or from true anomaly. 

VARIABLE NAMES : 

TRUEAN - true anomaly, degrees 
TIMEPR “ current time, hours 

NSTP “ step number reference for kno^m DI and AQ values 
RESTRICTIONS : 

Current geometry must agree with that of NSTP. 

CALLING SEQUENCE ; 

CALL STFAQ (TRUEAN, TIMEPR, NSTP) 

NOTE : 

If TRUEAN. GT. 0. , time is computed from TRUEAN; othertirise TIMEPR is passed 
directly to current step data storage. 


Default Value 

None 

None 

None 
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SUBROUTIHE NAME; 


SURFP 


PURPOSE ; 

This subroutine defines parameters for computing solar fluxes on a con- 
figuration located on a planet's surface, 

DEFINITIONS 


Variable Names 


Def ault Values 


PNME - name of planet (3HEAR,3HMOO,3HMAR) None 

ALAT - location on planet surface, degrees of latitude None 

SUNLAT*- latitude of subsolar point, degrees None 

AEX - Atmospheric extinction factor (or peak flux at None 

solar noon, Btu/hr-ft^) 

RESTRICTIONS : 


None 

CAILING SEQUENCE : 

CALL SURFP (PNAME , ALAT , SUNLAT , AEX) 

NOTE: *For PNAME = SHEAR, SUNLAT is input as day of year (1,^ SUNLAT ^365.) 
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APPENDIX E 
SEGMENT DESCRIPTIONS 

Segment Name 

NPLOT, OPLOT, PLOT 

FFCAL, RBCAL, CMCAL 

DICAL, DRCAL 

SFCAL 

RKCAL, GBCAL, RCCAL 

AQCAL 

QOCAL 


i 



Page 

E-2 

E-3 

E-4 

E-5 

E-6 

E-7 

E-8 
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SEGMENT MAME ; NPLOT 

PURPOSE; 


This segment generates pictorial plots of nodal surfaces. 
RESTRICTIONS ; 


None 

CALLING SEQUENCE; L NPLOT 


SEGMENT NAME ; OPLOT 

PORPOSE ; 

This segment generates pictorial plots of the spacecraft in orbit. 
RESTRICTIONS: 


None 

HAT.T.TNG SEQUENCE; L OPLCO: 


SEGMENT NAME : PLOT 

PURPOSE ; 

This segment generates function vs time plots of absorbed 
and incident heat rates and fluxes. When used in conjunction with 
operations block FORTRAN that writes data to a plot data unit, 
this segment provides general x vs y plot capability. 

RESTRICTIONS : 

Reference Subroutine PLDATA 
CALLING SEQUENCE: L PLOT 
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SEGlt'lSKT NAME; 


ffcal 


PURPOSE ; 

This segment calculates all form factors for the active configura- 
tion defined by previous calls to BUIIDC and ADD, 

GALLING SEQUENCE ; L FFCAL 

SEGMENT NAME ; RBCAL 

PURPOSE ; 

This segment computes all "image factors" for configurations containing 
one or more specular surfaces. It computes form factors from all nodes to 
images of all nodes, as seen in the specular surfaces, and adds these form 
factors to the "direct" form factors computed by FFCAL to create "total" 
form factors or image factors* 

CALLING SEQUENCE ! L RBCAL 

RESTRICTION ; RBCAL must be called after a call to FFCAL using the same 
configuration. 


SEGMENT NAME ; CMCAL 

PURPOSE : 

This segment combines form factor matrices according to user-input 
correspondence data and auto-combine correspondence data for polygons. 

CALLING SEQUENCE: L CMCAL 


RESTRICTION : Call is meaningful only after an FFCAL execution under the 

configuration name defined in CMDATA. 


1 
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SEGMENT NAME; 


DICAL 


PURPOSE ; 

This segment computes solar, planetary, and albedo irradiation 
incident on spacecraft nodes. 

RESTRICTIONS ; 

Call valid only after previous calls have been made to define 
spacecraft geometry, location in space, characteristics and distances 
of heat source bodies, and computation accuracy parameters. 

CALLING SEQUENCE ! L DICAL 

SEGMENT : DRCAL 

PURPOSE ; 

This segment computes the component of solar flux resulting fr'"Ti the 
image of the sun as seen in the specular-diffuse surfaces by each node. 
These components are added to the direct fliix values computed by DICAL 
to obtain total direct flux. 

RESTRICTION : 

Call valid only after a previous call to DICAL, using the same con- 
figuration, 

CALLING SEQUENCE; L DRCAL 
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SEGMENT NAME: 


SFCAL 


PURPOSE; 


a. Segment computes analytically and stores on tape tables of internode 
blockage (shadov) factors for use in direct irradiation calculations. 

b. When a complete shadow factor ts.^ e supplied, segment is executed in 
order to pass shadow tables into program storage and initialize DICAL 
to compute irradiation using shadow tables. 

RESTRICTIONS: 


None 

calling SEQUENCE : L SFCAL 


r 
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SEGMENT NAME; RKCAL 

PURPOSE: 

This segment computes radiation conductor values and punches (at user's 
option) output data in thermal analyzer format. Output card images are 
printed. 

RESTRICTIONS : 

Gall valid after spacecraft geometry is defined and matching form 
factor matrix is computed, 

CALLING SEQUENCE ; L RKCAL 


SEGMENT NAME : RCCAL 

PURPOSE; 

This segment computes radiation conductors, simplifies and condenses 
these conductors using the ERN and MESS techniques, and provides output 
in punched card and/or BCD tape form, 

RESTRICTIONS ; 

Same as RKCAL 

CALLING SEQUENCE : L RCCAL 

SE GMENT NAME ; GBCAL 

PURPOSE ; 

Segment computes and stores grey-body factor matrix. 

RESTRICTIONS ; 

Same as BUCCAL 

CALLING SEQUENCE ; L GBCAL 
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SEGtEMT NA^E : AQCAL 

PURPOSE ; 

This segment computes absorbed heat rates in two wavebands, 
accounting for diffuse reflection. 

RESTRICTIONS ; 

Appropriate direct irradiation, grey-body factors, and surface pro- 
perties must be in system storage. 

CALLING SEQUENCE ; L AQCAL 


SEGMENT NAtlE; 


QOCAL 


PURPOSE : 

This segment accesses absorbed fltnc data and generates orbital 
average and absorbed flux vs time arrays. Arrays are output in 
thermal analyzer format on cards or BCD tape, 

RESTRICTIONS; 


None 


CALLING SEQUENCE; 


L 


QOCAL 


APPENDIX F 


RADIATION CONDENSER SEGMENT THEORY 




A. BASIC CONCEPTS 


The Multiple Enclosure Simplification Shield (MESS) technique 
and the Effective Radiation Node (ERN) technique are Independent 
and can be discussed separately. Consider an N-node radiative en- 
closure that forms a section of a complex thermal model. The 
temperature of node i is a function of thermal radiation coupling 
and the applied heat load, (assume that heat loads resulting 
from conduction and convection are included in Q^) . The steady- 
state temperature of node i is then given by 



B. ERN TECHNIQUE 


In applying the ERN technique, the enclosure radiation conduc- 
tors for the ith node are divided into primary and second- 

ary couplings. The summajiion term in the numerator of Equation 
(1) can then be written as follows: 


E (T I * - E O' AiVk* * ^ ^ VW 

j=i ^ J lc=l ^ X JJ=p^+l ^ vC A- 


( 2 ) 


The number of radiation conductors can be reduced by arranging the 
conductors in decreasing order of the conductor value 
replacing the secondary coupling summation of Equation (2) with a 
single conductor coupled to an ERN. That is. 


In Appendix F, the letter F shall denote the grey-body factor, 
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S cr 
" i 


r N 

Ji?p.+r 


L 1 


ERN 


(3) 


The ERN temperature is calculated by the thermal analyzer program 
as a steady-state node temperature based on a fourth-power, conduc- 
tor-weighted average of the enclosure node temperatures using the 
secondary conductors. 

N N , N N 




(4) 


Using the relationships of Equations (2) and (3), the approximate 


ith node temperature can be written from Equation (1) as a function 
of the ERN temperature. 



C. APPLICATION OF THE ERN TECHNIQUE 


The significant radiation fraction defined by the relationship 


P. 

3 . 


P. 

X 


RFRAC= EcrAiF.y^EcrVij 


= E 

k=l 


^ik 




(6) 


is specified by the user- The number of primary conductors, P^, 
is determined by summing conductor values for a given node until 
the sum is greater than the fraction RFRAC of the sum of all con- 
ductors to the node. That is. 
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p <r A.r^^ > EPRAC* £ fi- A.F 
k=l j-1 

All primary and reverse direction conductors are flagged to be 
used intact* The secondary conductors for each node are summed to 
determine the conductor value for the node-to-ERN coupling* 

Since the error in the approximate temperature is a function of 
the enclosure temperature band, the ERN technique results can be 
improved if nodes that deviate significantly from the average 
temperature of the enclosure are not coupled to the ERN. These 
analyst-defined nodes are referred to as special nodes. 

The percentage reduction In enclosure conductors and subsequent 
netT-70rk error as a result of applying the ERN technique are control- 
led by the analyst’s selection of an RPRAC value consistent with the 
known accuracy of problem parameters (enclosure geometry, surface 
optical properties, etc). 

Experience has shown that the greatest percentage reduction in 
conductors results for enclosures with more than 75 nodes, signi- 
ficant shadowing, and low-emittance surfaces. An RFRAC value of 
0,7 has been found to result in a significant reduction in conduc- 
tors with acceptable error for typical radiation enclosures. 

D. MESS TECHNIQUE 

The MESS technique provides the analyst with a means of divid- 
ing a radiation enclosure into an arbitrary number of subenclosures. 


]?"5 


MESS Tiode pairs are defined by the analyst at the interface be- 
tween subenclosures as two planar surfaces with the property of 
absorbing and emitting all energy incident upon them (black sur- 
faces) . Consider an N-node subenclosures n, as shown in Figure 
where the subscripts r and r* refer ho the MESS node pair of 
Che nth and jth subenclosures , respectively. Temperatures in n are 

affected by » which represents the average thermal effect of 

r * 

the j subenclosure nodes on the nodes of n. The primary conduc- 
tors of Equation (2) include conductors to MESS nodes. For a 

general subenclosure, n, with R interface l^IESS nodes, the primary 

n 


radiation coupling sunmiation for node i is 
P. R 


P. 


Vir^SS^. 


( 8 ) 


An energy balance on MESS node r* gives 

4 


R. 

r j 




Wss , “ ^ S, ^MESS , ^ 

r L m=l m 


mt^r 


R. 

j 


"r- 


‘*‘^^r'\'r ^SS S/ ( S, (tA iF t ^ £ ^^t^^r'^r'k 
r m=l ^ r r m k-R.+l 

mfr' J 

1 

+ crA^,F^,r) (9) 

F^r^ represents the reflections between n and j due to noublack 
subenclosure surfaces and is obtained from the radiation inter- 
change matrix for each subenclosure. 
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The approximate temperature of the ith node is obtained from 


Equation (5) , using Equation (8) , as 


/ 

T. = 

X 


r\ ^i 4 

^MESS^^, + je^ +1 ^ 
n 




i" ih' "ERN ^i 


N 


r=l 


rt- A.F. 

0 X rr 


+ cTA.F. „ + V <ta.f..)1 

0 =R ^ +1 X xh J 

Tl 


ll=P>l 
1 


( 10 ) 


The error in is a complex function of the percentage of 
EHN secondary conductors, temperature band of the subenclosure 
nodes, and the number of subenclosures. In a variety of problems 
studiedt the error has been found to be negligible. 


E. APPLICATION OF THE MESS TECHNIQUE 

Generation of MESS one-way conductors from the subenclosure 
radiant interchange matrix requires that the analyst specify the 
interface MESS node pairs. As node conductors are generated, 

MESS nodes are flagged and appropriate one-way conductors are 
generated for use in the thermal analyzer program. 

The location of MESS node pairs in an enclosure is influenced 

by: 

a. the number of subenclosure surfaces; 

b. geometric considerations; 
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c. expected thermal gradients; 

d- the number of analysts available to work on the enclosure- 
Optiiium reduction in form factors and conductors occurs in large 
enclosures divided such that the subenclosures contain approximately 
equal numbers of nodes. For enclosures divided into two approxi- 
mately equal subenclosures, up to 507o reduction in the number of 
form factors and conductors can be expected* 

F. ERN/HESS APPLICATION 

The ERN and MESS techniques can be applied separately or simul- 
taneously as the particular problem dictates* l^en they are applied 
simultaneously, an ERN is defined for each subenclosure and the 
MESS nodes are considered to be special nodes; that is, MESS nodes 
are not coupled to the ERN* 

G* SUM^IARY 

The EKN/MESS technique reduces the number of form factors and 
radiation conductors necessary for enclosure radiation analysis and 
extends the analysis to include enclosures of arbitrary complexity* 
The use of the ERN/MESS technique can result in significant savings 
in time, both for the analyst and the computer* 
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APPENDIX G 

I, TAPE /FILE INFORMATION 

II. SUMMARY - USER TAPE/FILE INFORMATION 


NOUT 

PP/P 

Priat Output File 

DI 

PP 

Preprocessor Data Input File 

RIO 

PP 

Random Access Data File 

CMERG 

PP 

CMERGE Tape 

E11ER6 

PP 

EMERGE TAPE 

RSI 

PP/P 

Permanent Restart Input Tape 

RSO 

PP/P 

Permanent Restart Outpui: Tape 

PNGH 

PP 

Punch Output File 

SGI 

PP 

Scratch File 

SG2 

PP 

Scratch File 

SC3 

PP 

Scratch File 

CMPL 

PP 

Operations Data Compile File 

SQMTL 

PP/P 

Sequential Data File 

DIR 

PP/P 

Direct Irradiation Restart File 

FFR 

PP/P 

Form Factor Restart File 

GBIRR 

PP/P 

Correspondence Data Input File 

PLSR 

PP/P 

Shadow Factor Data File 

RTI 

P 

Temporary Restart Input Tape 

RTO 

P 

Temporary Restart Output Tape 

BCDOU 

P 

BCD Data Output Tape 
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TRAJ 

PP/P 

Trajectory Tape 

USERl 

P 

User File 

USER2 

P 

User File 

GBIRR 

PP/P 

Correspondence Data File 

TQR 

PP/P 

Total Heat Rates, Restart File* 

FF 

PP/P 

Form Factor Data Storage File 

6BIR 

P 

Infrared Grey-Eody Storage File 

GBSO 

P 

Solar Grey-Body Storage File 

PLS 

P 

Planetary Form Factor Save File 

TQ 

P 

Total Heat Rates Storage 

SCRl 

P 

Scratch File 

SCR2 

P 

Scratch File 

SCR3 

P 

Scratch File 

RAN 

P 

Random I/O Data File (Equivalent 
to NRIO) 

PUN 

P 

Punch Output File 

DI 

P 

Direct Irradiation Data Storage 
File 


**PP; 


Preprocessor; P 


Processor 
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II. SU>1MARY USER TAPE/FILE INFORMA.TIOW 


A. Input Tapes/Files 


1) RSI - Typical data stored are; model, FAs, GBs, RBs, SFs, 
DIs and DRs. Source would be TRASYS II RSO tape, 

2) RTI - Temporary storage of FA, GB, RB, DI, DR interim 
calculations. Source would be a TRASYS II RTO tape, 

3) OERG - Any BCD data source could be TRASYS I RTO or 
TRASYS II USERl tape. 

4) EMERG - Gould consist of segment (s) of TRASYS input 
model. Source would be TRASYS II RSI/RSO tape. 

5) TRAJ - FA and GB data. Source would be TRASYS I USERl 
tape or >IPAD trajectory tape. 

B. Output Tapes/Files 


1) RSO - Typical data stored are model, FAs, GBs, RBs, 

SFs, DIs, and DRs. Used as a TRASYS II RSI input 
tape. 

2) RTO - Used for temporary storage of FA, GB, RB, DI, 
and DR interim calculations. Used as a TRASYS II RTI 
input tape. 

3) USERl - Typical BCD data stored are; FFs and DIs, Can be 

used as TRASyS II GMERG input tape. See Section II-c, 
Appendix G. 

4) BDCOU - BCD data stored for thermal analyzer (SINDA) 
interface includes RADKs, cyclic and averaged heating 
rates . 

C. Preprocessor Tapes/Files Processor Tapes/Files 

RSI 
RSO 
CMERG^ 

EMERG^ 


^ Freed internally within TRASYS runstream at end of preprocessor 
execution. 


RSi2 

RSO 


rti2 
RTO 
BCDOU 
USER 1 
TRAJ 


2 


Freed internally within TRASYS runstream when an end of file or 
parity error is encountered. 
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FOR 


DIFFUSE PLUS SPECULAR RADIATION ANALYSIS 
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I* ANALYTICAL DEVELOPMENT 

The assumptions and groundrules and the development of the 
mathematical equations for diffuse-plus-specular radiation 
analysis are presented in this section, 

I • Assumptions and Groundrules 

The following assumptions and groundrules were used in the 
analytical development presented herein for diffuse-plus-specular 
radiation analysis techniques. 

a* All surfaces are considered to be semi-gray (accounts for 
absorption and reflection, but no emission in the ultra- 
violet portion of the spectrum; accounts for absorption 
and reflection as well as emission in the infrared portion 
of the spectrum) * 

b. Equations are developed for use in analyzing radiation 

enclosures consisting of diffuse, specular, and/or diffuse- 
plus- specular surfaces using an imaging technique. 

c* All surfaces are considered to emit diffusely and to re- 
flect with diffuse and specular components such that the 
relationship 

e ^.Pd^ps^^ ^ 

i i i i 

is satisfied. 

d. All surfaces with specular components of reflectance are 
restricted to planar surfaces to simplify imaging. 

e. Only first-order images are considered (that is , no 
images of images or images in images are generated). 

2. Development of Equations 

The development of equations for radiation interchange fac- 
tors follows the same procedure for both the infrared and ultra- 
violet portions of the spectrum with the only differences being 
in notation. Therefore, only those equations applicable to the 
infrared portion of the spectrum are developed here. 
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Consider a radiation enclosure consisting of N surfaces* The net 
heat flux from any one of these surfaces can be represented by 


^i,net 


N 

= crS 


3 -. . (T,^ - T.^) 
3-J 1 j 


( 1 ) 


where 3 - * is the radiation interchange factor that couples surface i 
to surface j. 

The method of approach that is applied here in the development 
of radiation interchange factor (5^. .) equations is an extension of the 
method set forth by Gebhart for purely diffuse enclosures (references 
1, 2 and 3. The special utility in this formulation is that it 

yields coefficients which represent the fraction of energy emitted by 
a surface that is absorbed by another surface after reaching the absorbing 
surface by all possible paths. 

Considering first-order images only, the general equation for the 
Gebhar t-type absorption factors for a diffuse-plus-specular enclosure 
can be written 



( 2 ) 


By means of a term by term examination, equation (2) can be interpreted as 
follows : 

The fraction of the energy leaving surface i that is finally absorbed by 
surface j equals the sum of 

a, the energy that goes directly from surface i to surface j and 
is absorbed, 

b. the energy that goes from surface i to surface j by all possible 
first-order specular reflections and is absorbed, 

c, that fraction of the energy that goes directly from surface i 
to each of the surfaces in the enclosure, finally arri'^'es at 
surface j by all possible paths due to diffuse reflections, and 
is absorbed, 

d. that fraction of the energy that goes from surface i to each 
of the surfaces in the enclosure by all possible first-order 
specular reflections, thence to surface j by all possible paths 
due to diffuse reflections, and is absorbed. 
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Re£irranglng l:he terms in equation (2) yields 






•I* 


K 


[^1 


xm 


N 

k=r 




im(k)J/-^ mj ’ 


i = 1,2,..., N 


j - 1,2, ...,N 


(3) 


Equation (3) can ba further simplified by defining an "image factor" 

(0*p that fraction of the energy that leaves surface i and arrives at 

surface j both directly and by all possible first-order specular reflections, 
such that 






i = 1,2, ...,N ; j - 1,2, ...,N 


(4) 


Substitution of equation (4) into equation (3) yields 

/^ij ~ ^ij ■** m ^im /^mj 

Rearrangement of the terms in equation (5) yields 


(5) 


N 


xm / m xm mj J xj 

Equatiou (6) can be represented in matrix form as 

[”ij] [/^i]]= h«ij] 


( 6 ) 


(7) 


where D is an N X N coefficient matrix with general element 

/>ihi 


D.. = 
^2 


The systems of equations represented by (7) can be solved by matrix 
inversion to obtain the absorption factors ( 

N 




ij 


’53 -1 

D. e .0 . 
xm J mj 


-J 

tn^l 


( 8 ) 


(9) 
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The radiation xntcn^change factors (5*. .) related to the absorption 
factors (see reference 1) by the expression 




( 10 ) 


and, using the usual arguments^ for the conservation of energy, the 
reciprocity relation for the values of ^ ^ is 





( 11 ) 


The foregoing equations apply to radiation enclosures consisting 
of any combination of diffuse and specular surfaces ranging from totally 
diffuse to totally specular enclosures, 

l^hen the problem consists of an "incomplete** enclosure and a space 
node is present, the radiant interchange factor to space is computed from: 




N 

-I\3f 

3=1 


ij 


( 12 ) 


for an N-node incomplete enclosure. 
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A thermal analyst is sometimes confronted with the requirement to determine 
temperatures and heat flows in an enclosure that would require a great number of 
nodes to furnish adequate simulation, but also shows a great deal of symmetry and 
duplication of geometry. 

An example of such an enclosure is shown below* 



Subenclosures A, B and C each contain an identical heat source/sink node 
(X) 3 and each subenclosure can *'see^^ into the adjacent subenclosure with a 
significant view. If the thermal boundary conditions for each of the subenclosures 
are approximately the same, a condition of thermal radiation symmetry exists, that 
is, energy Leaving B across plane abc is equivalent to the energy entering B 
across plane abc. The same can be said about the situation at plane def* Thus, 
planes abc and def are adiabatic surfaces in the sense that the net heat flow 
across them is zero* It is, therefore, correct thermal simulation to create a 
TEASYS model of subenclosure B with adiabatic ^^mirrors" at planes abc and def to 
simulate the presence of subenclosures A and C. Notice that this takes into account 
only the effects of subenclosures A and G. If a longer string of identical sub- 
enclosures exist and it is desired to account for them, two or more enclosures 
can be constructed and closed with adiabatic mirrors* A two enclosure model would 
thus account for the thermal affects of two enclosures on each end, a three 
enclosure model would account for three on each end, and so on. 
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Implementation of this procedure is quite simple using subroutine ADSURF. 
There is no need to define the shape or location of the two reflecting planes, 
although the true enclosure area of the reflecting planes is a required input. 
I'lhen the user needs one or more adiabatic reflector planes, he merely adds 
an extra BC; to his surface data and defines within it a single rudimentary 
surface with verv high reflectivitv. This surface definition might be as 
follows ; 

CGI CC7 
BCS ABSURl 

S SDRFN = 10000, TYPE = RECT, PROP = .0001, .0001, ACTIVE == TOP 

PI = 1.0, 1.0, 0.0 

NOTE: BCS ADSURl can contain one and only one surface. 

With the adiabatic surface defined thus, the area must be determined 
outside TRASYS and entered as an argument to subroutine ADSURF. If desired 
the adiabatic surface may be defined in the usual manner and its area will 
be determined by the program. A zero would then be used as the area argument 
in ADSURF. 

With this surface in the surface data block, the user may apply the 
adiabatic "mirror" technique to an enclosure by a call to subroutine ADSURF 
subsequent to his FFCAL execution. If desired, the effect of the adiabtaic 
surface can be determined in a single run by executing FFCAL, GBCAL and RKCAL 
in the usual manner, followed by a call to ADSURF, followed by GBCAL and RKCAL 
executioh to produce another set of radiation conductors, this time with the 
"mirrors’* in place. 
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